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PREFACE 


ORGANIZATION 


This book describes the internal logic of the Virtual Storage 
Access Method (VSAM) and contains diagnostic information. It is 
directed to maintenance personnel and development programmers 
who require an in-depth knowledge of VSAM's design, 
organization, and data areas. 


This book is designed to be used with the VSAM program listings 
on microfiche and with MVS/Extended Architecture Data Facility 


Product: Cross Reference, also on microfiche. 


This book has the following parts: 


e "Introduction" describes the use of VSAM, how VSAM fits into 
the operating system, how it interacts with the operating 
ha and the user's program, and the major components of 
VSAM. 


e "Mathod of Operation™ describes the functions performed by 
VSAM. Each diagram in this section is intended as a key to 
a module name (and a procedure name, as appropriate) in the 
microfiche listing. <A description of how to read these 
diagrams is included in this section. 


e "Program Organization" describes the information contained 
in VSAM program listings and the flow of control between 
modules. 


e "Directory" lists VSAM modules and includes method of 
operation diagrams related to each module. 


e "Data Areas" describes control blocks used by VSAM and 
describes the format of VSAM data and index records. 


® "Diagnostic Aids” contains information for locating the 
cause of problems in the VSAM procedures. This section also 
describes cross-reference reports. 


e "Glossary" defines terms relevant to VSAM, and lists 
abbreviations and acronyms used in this book and in the VSAM 
program listings. 


e "Index" is a subject index to this publication. 


PREREQUISITE KNOWLEDGE 


REQUIRED READING 


To use this book efficiently, you should have a basic 
understanding of VSAM concepts and a knowledge of VSAM macros. 


You should be familiar with the information in the following 
publications: 


e MVS/ZExtended Architecture VSAM Administration Guide, 
GC26-4015, for an introduction to VSAM concepts. 


e MVS/Extended Architecture VSAM Administration: Macro 
Instruction Reference, GC26-4016, for an explanation of VSAM 
macros. 
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RELATED PUBLICATIONS 


iv 


Within the text, references area made to the publications listed 
in the table below: 


Order 









Access Method 
Services 
Reference 


GC26-4019 













GC26-4075 


LY26-3899 






Catalog 
Diagnosis Guide 















Catalog LY26~3897 
Diagnosis 
Reference 
Chackpoint/ 
Restart 
Checkpoint/ LY26-3890 
Restart eagenpaine ° Res art Supe : 
Supervisor 
Call Logic 
DADSM and CVAF LY26~-3896 
Diagnosis Guide 
DADSM | ae Beene: Eebomaoan 3904 
| ae Beene: | Wacbxtendad Accateckure 

Eisai 46014 


Data 
Administration: 
Macro 
Instruction 
Reference 


LC28-1164! 
LC28-1165 
LC28-1166 


Dabugging 
Handbook 


paousal 5 


LC28-1167 
LC28-1168 





DFP XREF LYB6-0080 
Listings 


GC28- | 6628-1148 


Note: 


i All five volumes may be ordered under one order number, 
LBOF-1015. 
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a order 
Short Title Publication Title Number 


MSS LY35-0038 
Communicator 


Open/Close/EQV LY26-3892 
Logic 


Sarvice Aids GC28-1159 























GC28-1154 





Supervisor 
Services and 
Macro 

Instructions 


System Logic MVS7Extended Architecture LY28-1270 
| Library system Logic Library, Volume 


System 
Management 
Facilities 


System Messages pcb 
Massaces: passede—iprery-—Systen 1 an gc28-1377 
VSAM 
Administration 
Guide 


VSAM 
Administration: 
Macro 
Instruction 
Reference 
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ELEASE UPDAT DECEMBER 198 


| ENHANCEMENTS AND NEW SUPPORT 


e The "Record Management Trace Facility” in the "Diagnostic 
Aids™ section has been rewritten to improve usability. 


e “DIAGRAM BV1.VSAM Management Trace Facility” in the "Method 
of Operation” section has been updated as a result of the 
R/M Trace Facility changes. 


e A cross-index for control block identifiers has been added 
to "Data Areas.” 


® The AMCBS control block has been added to "Data Areas." 
° The OPWFLAGS field has been added to the OPW control block. 


e as request types have been added to the RPL control 
block. 


e The UPTSARES and UPTFI1ALT fields have been added to the UPT 
control block. 


° The following lists of return codes have been updated: 


Logical-Error Return Codes in the RPL Feedback Field 
(Figure 65) 


Physical-Error Return Codes in the RPL Feedback Field 
from a Request Macro (Figure 67) 


Open and Close Return Codes 


RELEASE 1.2, FEBRUARY 1984 


The following control blocks have been updated: 


° ACB 

° EDB 

e EXLIST 

e RPL 
RELEASE 1.1, APRIL, 1983 


vi 


Information to support 31-bit addressing has been included. 
This support allows: 


e VSAM I/0 buffers to reside above the 16-megabyte line in 
storage. 


e Up to 16 local, shared resource pools per address space. 
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Virtual Storage Access Meathod (VSAM) is an access method for use 
with the operating system. VSAM is used with direct~access 
storage to provide fast storage and retrieval of data. 


VSAM's record format is different from that of other access 
methods. All VSAM records are stored in 

control interval is a continuous segment of auxiliary storage. 
The records are ordered according to values in a kay field or 
according to when they were stored. With key-~sequenced data 
sets, the user can gain access to a record by specifying its key 
or its relative byte address (RBA). With entry-sequenced data 
sets, the user can gain access to a record only by specifying 
its RBA. For additional information on VSAM records and how 
they are stored, see "Data Areas." 


User programs that contain Indexed Sequential Access Method 
CISAM) macros can be used to process records in a VSAM data set. 
The ISAM interface program that allows the use of ISAM macros 
builds the necessary VSAM control blocks when an OPEN macro is 
issued and ensures that VSAM control blocks are properly 
initialized when subsequent requests ara made for reading or 
writing records. 


Most of VSAM resides in the pageable link pack area in the 
common area of virtual storage. Figure 1 on page 2 illustrates 
VSAM's relationship to the control program, to the user's 
processing program, and to the data stored on a direct~access 
storage device and in mass storage. The subpools indicated in 
the figure (230, 231, 239, 241, 245, 250, 252) contain VSAM 
control blocks. For more information, see "Virtual-Storage 

( Management" in "Diagnostic Aids." 


Cc 
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Figure 1. Relationship of VSAM, the Control Program, User's Processing Program, and 
Stored Data 





VSAM is controlled by user macros. These macros are expanded 
into calling sequences to VSAM functions. For additional 
information on user macros, see VSAM Admini i : 

ructiton Referenc 


VSAM communicates with other parts of the operating system 
through the SVC processor and through control blocks used by 
VSAM. In addition to the control blocks used by VSAM, VSAM 
builds and uses the access~method control block (ACB). The ACB 
describes a VSAM data set in much the same way that a DCB 
describes a non-VSAM data set. 


In addition to processing records and data sets, VSAM opens and 


closes data sats and does most of its own space management, that 
is, VSAM makes only minor use of the control program Open and 
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Close and relies on the control program DADSM for only part of 
its space management. To do much of this work, VSAM uses the 
the control program catalog. The control program catalogs 
contain a description of VSAM space, locations of available 
spaca, how space is used, and the location of data sets. For 
anil information on the catalog, see i 


Guide and Catalog Diagnosis Reference. 
VSAM is logically grouped into the following functional areas: 


e Data set management (sometimes referred to in program 
documentation as "I/0 support"), which comprises Open and 
Close for VSAM and for the ISAM interface, virtual-storage 
management, and BLDVRP/DLVRP processing 


- Open connects a user's program to a VSAM data set and 
builds the control blocks required to permit the user to 
read from and write to the data set. 


- Close disconnects a user's program from a data set and 
releases the data set's control blocks built by Open. 
Close also updates statistics in the catalog. 


- Virtual~storage management centralizes the processing of 
most requests for virtual storage. 


- BLDVRP/DLVRP processing builds and deletes VSAM resource 
pools for processing with local or global shared 
resources. (Processing with shared resources is 
described from the i a point of view in 

an ‘ 


e Record management, which comprises processing to satisfy 
user requests for access to data, including end-of-volume 
processing 


- Data request processing requests I/0 management to read 
and write records in response to user~jissued VSAM and 
ISAM macros (the latter by way of the ISAM interface). 
It also requests I/0 management to read and write 
records for the control program catalog management. 


- End of Volume mounts volumes and allocates space. It 
modifies the existing control blocks to reflect the 
newly mounted volumes and newly allocated space. 


e Control block manipulation, which allows a user's program to 
generate some control blocks (ACB, EXLST, and RPL) 
dynamically and to modify, display, and test their contents 


e I/0 management, which comprises the problem-state I/0 
driver, the supervisor~state I/0 driver, the actual block 
processor, end appendages, an asynchronous routine, and a 
purge routine 


- The drivers and the actual block processor translate 
requests for access to the contents of control intervals 
to requests for reading and writing physical records. 
They build a channel program to give to the control 
program I/70 supervisor. 


- The appendages and the asynchronous routine get control 
back to the requester after I/0 is finished. 
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Method of operation diagrams are functional descriptions of 
VSAM. The diagram and descriptive notes, keyed to the diagram, 
are on facing pages. 


EADING HOD OF OPERATION DIAGRAMS 


The diagrams contain three blocks of information: input, 
processing, and output. The left side of the diagram shows the 
data that serves as input to the processing steps in the center 
of the diagram; the right side shows the data that is output 
from the processing steps. Input is anything a program function 
refers to or gets. Processing is the steps required to fulfill 
the function represented by the diagram. Output is any change 
effected by a function; for example, register contents, or 
control blocks created or modified. The processing steps are 
numbered; the numbers correspond to notes on the facing page. 
The notes include cross-references to the listings. Figura 2 
shows a typical method of operation diagram. 





ISAM-User’s Address Space ISAM-User's Address Space 
The ISAM-user’s program issued OPEN (SVC 19) fora 
VSAM data set. Open enters VSAM here. 









Open 


Porameter il 
7s PH 
eoagcall ISAM-Interface Open Processing 
| -|——|3 1. Build the ISAM Interface control block — IICB — 
ntumation FIC for each DCB for a VSAM data set being opened. 


NDNAME -» 2. Build the VSAM user control blocks — ACB and 
EXLST — using information in the ISAM DCB. 


. Issue OPEN, SVC 19, to open the ACB. 











SYS1.SYSJOBQE 
Datu Set 





VSAM-User’s Address Space, or 





ISAM-User’s Address Space after Step 3 VSAM- or ISAM-User's Address Space 
: The VSAM-user’s program or ISAM-Interface Open jan eRe i 
Register 2 issued OPEN (SVC 19). Open enters VSAM here. ph Stem te DE Bs 
VSAM Open Processing 
Register 9 @ 
\ 4. Initialize for processing the user ACB. (11) 
(1720) 5. Mount and verify volumes. (21) 
23X26) 6. Open the object. (28) as 
Open VERIFY macro, if required. 
: , : ‘ ACBDE 
G0¥39) 7. Ifa base cluster is being opened for output 
und has an upgrade set, open the upgrade hens ies 
set. 49) 
\ 
(46) 8. If the dsmae on the DD statement names N 
LS _ a path. open the alternate index associated N 
with the path. (48) N 
\ 
6 0X52Y56) 9. Prepare for subtask sharing and job step N 
: termination. NUN ANARAAAAALALAAARARUANURAULRARAASLLNA LAAN AANA ARTA NN ANNE AY 
sl 10. Terminate Open processing. 58) 





Figure 2. Typical Method of Uperation Diagram 
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The left side of the diagram shows the input required by the 
function shown in the diagram. For example, register 1 points 
to a list of DCB pointers for an ISAM user. The SYS1L.SYSJOBQE 
contains the JFCB, which indicates the data set's organization. 
The data-set information in the DCB is input to steps 1 and 2 in 
the processing portion of the diagram. The DDNAME is input to 
step 2 in the processing portion. 


The processing portion of the diagram shows the processing steps 
required to fulfill the function described by the diagram. Note 
that the function described by one diagram might be performed by 
one or more VSAM modules; that is, the diagrams describe 
functions, not physical parts of the program. 


The figure shows two conditions for which VSAM Open is called: 
(1) at step 1, when processing is to be done for an ISAM user 
program and (2) at step 4, when processing is to be done for a 
VSAM user program or for an ISAM user program that has been 
processed by steps 1 through 3. The numbers 1, 2, 3, 4% and 5 
are keys to the notes for this diagram. 


The output created by each processing step is shown in the 

diagram. Step 1, for example, builds a control block (the 

ayer, step 2 builds VSAM user control blocks (the ACB and 
). 


Reading the method of operation diagrams requires that you 


understand the symbols they use. Figure 3 on page 6 shows the 
symbols and describes their meaning. 
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Flow of control on the same diagram; 
‘3’ indicates a number of a process 
step on the same diagram. 


Flow of control between diagrams; 
‘AA3’ is the diagram number and 
‘2’ is the number of a process step 
on that diagram. 


aa 


Pointers 


----> 


Reference to data or 


hes >(H) testing of data by a 
process step; ‘H’ is an 
)- ——e< arbitrary designation. 


Input to process steps 
and output from process 
steps; ‘A’ is an arbitrary 
designation. 


Modification of data by 
a process step; ‘P’ is an 
arbitrary designation. 


ee 


Figure 3. Graphic Symbols Used in Method of Operations Diagrams 


Figure 4 on page 7 shows notes for the method of operation 
diagram shown in Figure 2. The notes provide details about the 
processing shown in the diagram. For example, the entry process 
and conditions are described by the first Cunnumbered) note. 
This note tells which Open modules allow an ISAM user's program 
to opan an ACB for a VSAM data set; Note 1 describes tha use of 
the IICB and directs you to "Data Areas" in this publication for 
detailed information on the IICB. The notes also name the 
modules and routines that perform the functions represented. 

The module and procedure names allow you to relate a process 
step to a unit of code in the VSAM program listings. 
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Notes for Diagram AC1 


When the caller issues the OPEN macro, 
SVC 19, IGCO001I (Open) is entered by 
the SVC interruption handler. 


Open obtains the JFCB from the scheduler 
work area. 


If the JFCB data-set organization 
(JFCDSORG) field indicates a VSAM data 
organization and the DCB data-set 
organization (CDCBDSORG) indicates 
indexed sequential organization, 
IFGO1L9SA (Open) sets the identifier for 
each DCB-for-VSAM-data-organi zation 
entry in the WIG table to ‘'2I', the 
identifier of the ISAM-interface Open 
routine. 


1 YIDAO19ZI: BLDIICB, INITIICB 


The IICB serves as a bridge between 
the ISAM user program's DCB and the 
VSAM control blocks that allow the 
user's program to read and write 
records. 


See "Data Areas” for details about 
the IICB. 


See the Date Areas microfiche for 
details abou e DCB. 


2 IDAO19ZI: BLDIICB, INITIICB, 
ACBMERGE 


The ISAM-interface Open routine 
builds an ACB and an EXLST for each 
DCB for a VSAM data set being 
opened. The ACB is initialized with 
the DCB DDNAME and MACRF fields. 


See "Data Areas” for details about 
the ACB and EXLST. 


S$ IDAO192ZI: OPENACB 


The ISAM~interface Open routine 
builds an open parameter list and 
issues SVC 19 to open the ACB. 


Open copies the ACB from the user's 
area into the Open work area. 


If the open-parameter-list entry 
addresses a VSAM ACB, Open sets the 
identifier field for each ACB entry 
in the WIG table to C'2A', the 
identifier of the VSAM Open routine. 
All further Open processing is 
bypassed for each ACB entry until 
the VSAM Open routine returns 
control to Open at step 57. 


VSAM OGpen Processing 
4 See Diagram AC2. 


5 See Diagram AC3. This step is 
skipped for a dummy data set. 


Figure 4. 
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6 See Diagram AC4&. The object could 
be an alternate index that is itself 
being opened for processing by the 
user. 


If the object was not previously 
closed successfully, issue the 
VERIFY macro to update the control 
block information in the catalog if 
the ACB options permit. If verify 
failed, issue a warning message 
error return. If verify was 
successful, issue a message and 
return code. 


7 See Diagram AC5. This step is 
skipped for a dummy data set. 


8 See Diagram AC6. This step is 
skipped for a dummy data set. 


9  IDA0192A: BLDDDEB 


VSAM Open builds a "dummy DEB*® for 
the user ACB and adds its address to 
the job step's TCB DEB chain. (The 
device-dependent section of the DEB 
is set to 0.) Each open ACB is 
identified by a dummy DEB in tha 
chain. If the user's program ends 
abnormally, ABEND closes the ACB or 
eee eeeect eee with each DEB in the 
chain. 


10 See Diagram AC7. 
A Note about Dynamic String Addition 


When OPEN is issued, not to open a data 
set, but to dynamically add a string to 
the user's capability to process 
multiple requests concurrently, the 
string is added and Open returns to the 
caller. VSAM record management requests 
dynamic string addition when more 
strings are required than the user 

speci fied. 


Record management indicates dynamic 
string addition by a flag in the ACB. 


IDAO19Z2Y CENQBUSY) issues EN@ on 
"SYSVSAM' with "B' Cbusy) indicated to 
prevent Open from using the control 
block structure that is affected by 
dynamic string addition. 


IDAO19ZY CINITPLH) builds and 
initializes an additional PLH, IOMB, 
IOSB, and PFL. IDAO192Y (BLDBUFC) 
builds and initializes an additional 
BUFC and buffer. IDA0192W builds an 
additional CPA and chains it to the 
BUFC. IDAO0192Y CDYNSTRAD) chains these 
new control blocks into the existing 
control block structure. (PLHDR points 
Sucks PLH, and BUFDR points to the 


Notes for Typical Method of Operation Diagram 
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Notes for Diagram ACl 


When the caller issues the OPEN macro, 
SVC 19, IGCOO001I (Open) is entered by 
the SVC interruption handler. 


Open obtains the JFCB from the scheduler 
work area. 


If the JFCB data-set organization 
(JFCDSORG) field indicates a VSAM data 
organization and the DCB data-set 
organization (DCBDSORG) indicates 
indexed sequential organization, 
IFGO193A (Open) sets the identifier for 
each DCB-for-VSAM-data-organi zation 
entry in the WTG table to ‘'2I', the 
identifier of the ISAM-interface Open 
routine. 


1 IDAQ192I: BLDIICB, INITIICB 


The IICB serves as a bridge between 
the ISAM user program's DCB and the 
VSAM control blocks that allow the 
user's program to read and write 
records. 


For details about the IICB, see 
"Data Areas." 


For details about the DCB, see the 
Data Areas microfiche. 


2 IDA0192I: BLDIICB, INITIICB, 
ACBMERGE 


The ISAM-interface Open routine 
builds an ACB and an EXLST for each 
DCB for a VSAM data set being 
opened. The ACB is initialized with 
the DCB DDNAME and MACRF fields. 


For details about the ACB and EXLST, 
see "Data Areas.' 


3 $IDA0192I: OPENACB 


The ISAM-interface Open routine 
builds an open parameter list and 
issues SVC 19 to open the ACB. 


Open copies the ACB from the user's 
area into the Open work area. 


If the open-parameter-list antry 
addresses a VSAM ACB, Open sets the 
identifier field for each ACB entry 
in the WIG table to C’2A', the 
identifier of the VSAM Open routine. 
All further Open processing is 
bypassed for each ACB entry until 
the VSAM Open routine returns 
control to Open at step 57. 


VSAM Open Processing 
4 See Diagram AC2. 


See Diagram AC3. This step is 
skipped for a dummy data set. 
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6 See Diagram AC4. The object could 
be an alternate index that is itself 
being opened for processing by the 
user. 


If the object was not previously 
closed successfully, issue the 
VERIFY macro to update the control 
block information in the catalog if 
the ACB options permit. If verify 
failed, issue a warning message 
error return. If verify was 
successful, issue a message and 
return code. 


7 See Diagram AC5. This step is 
skipped for a dummy data set. 


4 See Diagram AC6. This step is 
skipped for a dummy data set. 


9 IDAO0192A: BLDDDEB 


VSAM Open builds a "dummy DEB" for 
the user ACB and adds its address to 
the job step's TCB DEB chain. (The 
device-dependent section of the DEB 
is set to 0.) Each open ACB is 
identified by a dummy DEB in the 
chain. If the user's program ends 
abnormally, ABEND closes the ACB or 
cue eveccwened with each DEB in the 
chain. 


10 See Diagram AC?7. 
A Note about Dynamic String Addition 


When OPEN is issued, not to open a data 
set, but to dynamically adda string to 
the user's capability to process 
multiple requests concurrently, the 
string is added and Open returns to the 
caller. VSAM record management requests 
dynamic string addition when more 
strings are required than the user 
specified. 


Record management indicates dynamic 
string addition by a flag in the ACB. 


IDAO0192ZY CENQBUSY) issues EN@ on 
"SYSVSAM' with 'B' Cbusy) indicated to 
prevent Open from using the control 
block structure that is affected by 
dynamic string addition. 


IDAODL92ZY CINITPLH) builds and 
initializes an additional PLH, IOMB, 
IOSB, and PFL. IDA0192Y (CBLDBUFC) 
builds and initializes an additional 
BUFC and buffer. IDA0192W builds an 
additional CPA and chains it to the 
BUFC. IDA0192Y (CDYNSTRAD) chains these 
new control blocks into the existing 
control block structure. (PLHDR points 
anes PLH, and BUFDR points to the 
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Notes for Diagram AC2 


ll 


13 


14 


15 


LY¥26~-3907-1 


IDAO192ZA: INIT192ZA 


The open work area is mapped by the 
IDAOPWRK macro. 


IDA0192C 
The user establishes the number of 


times the operator may attempt to 
supply the correct password, as 


described in Access Method Services. 


If the correct password isn't 
supplied, VSAM Open sets the ‘ACB 
not opened’ return code in register 
15 and the ‘user password invalid’ 
flag in ACBERFLG. 


IDA0192C: LOCI 


LOC] issues a LOCATE (SVC 26) to 
obtain data~set type, catalog ACB 
address, catalog recovery area 
volume serial number, and 
control-interval number for each 
data set associated with the object 
named on the DD statement. 


IDA0192A: BLDLISTS 


During termination, the EN@s 
indicated in the ESL Cenqueue save 
list) will be dequeued, the DEBs 
indicated in the DSL will be 
unchained, the storage indicated in 
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16 


17 


18 


19 


20 


the CSL will be freed, and the pages 
indicated in the PLS will be freed. 
The SSL enables Open to chain 
control blocks at the end of Open 
processing. 
IDAGISZA: BLDENQPL, INITI192A 

Open enqueues on each data set to 
prevent it from being opened by 
other tasks during the current Open 
processing. 


IDAOQ192A: CONBASE 


If the IDF field in the AMBL of the 
data set being opened matches the 
IDF field of an AMBL on the primary 
chain, the control blocks for the 
base cluster already exist. 


The base information block contains 
the addresses of many of the control 
blocks built by Open for record 
management. 


No working storage header is used 
for processing a catalog, which is a 
special case. 


The addresses of various VSAM 
routines Crecord-management modules, 
I/0 appendages, special processing 
routines) are placed in various 
control blocks (CAMBL, IOSB, IRB, 
DEB, EXLST). 
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Notes for Diagram AC3 

21 IDAOI92F: VOLMNT 

22 IDA0Q192F: OLDDEV 

24 IDA0192V 
A volume in the JFCB and extensions 
is already mounted if a UCB 
allocated to the DD statement that 


iS associated with the user ACB 
indicates so. 
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26 


a7 


IDAQ192F: OLDDEV, NEWDEV 


A volume mount table is built for 
each device type allocated to the DD 
statement associated with the user 
ACB. Each VMT contains an entry for 
each successfully mounted volume of 
that device type. If a VMT already 
exists for a device type, the new 
VMT replaces the old one. 


IDA0192F 
If called from IDAOA05B CVSAM 


restart), OPWRSTRT will be on in the 
Open work area. 


Method of Operation 15 


Restricted Materials of IBM 


Licensed Materials ~ Property of I8M 











SITLLTILTT A PITTA AM ATED DEEEEEEEEEEE ed ayy YBNOIY} 


y J93SNYD aseq ay} ssaD0id 0} SyIO;qG JOmUOD 
TAWY .. Aunwng,, y Jouul pling ‘qed & saweU ,UWII}E3S GC 24) JI - 
y 
y ("Wesel Aq possedAg) 
CHILE EERE EM 





‘9BEIOIS [VII UT SYDOJQ [01}UOD 3y} x4 “gE 


t 


Sa 
{23810}s Jeol UI Pox syD0]q [0OI}U0D YM 
S$O908 [BAIDJUI-[01JUOD paaoiduH 10} QDY 24) SJ 


SAA 





ampnS 401g 
JO1UO0Z bjeq weg 






“JIISND 9yy Ss3901d 0) paprau 

S19] JNG PUB SPIO] [01}]UO2 WYSA 2Y) pling 
“poz,UNOU! se SOUINIOA paziNn bal yey) onsuy 
SSs005g op 

ssa00id }0U 0g sO 

*Ppapseou jt wWOjiad pue Zurssas01d 
durejsayep 10} sjas eyep pasoyezed 4D] YOoUD 









oWUIN{OA YIeq 103 
UI}Xq PUe JISTOA 


"P1099I ZOTePED XIPUI JY} WIJ Splayy aaouja1 


CLL“A (pPi0I31 Zojeyed 1ajsnj> ay} YIM payersosse) 
Bary YIOM usadO 


O=__: “AINJANIYS YAOFG yOINUOD 
@Wo — Aulstx) 3Y) Ol FAW YU) 2529uuU0) ‘OF 


TAWA DV 
qau WHSAISS 
ae 
dav BSE 


Zt 19351239y 


(ISI WOT] [Jed sty? Sf - 


“Jas EJep paosuanbas-Aay & St 1ajsnjo 34) J] - 


pJ03a1 3O[e}e9 Fep 3y)} Wl] Spjatj aaayay 


STADLO sIGo 
SPLELPELLLEOLA 3] JO] YOo|q JuaWaseuu JajsNp & png - 





£days qof sly) ut usdo Apeauye iaysnjo ay) sy - 


Raa 
ati (8)\@ZZZZA “3}SNID IY) JO} TEWY UE pling - 
—— 


LE 


ON / 
9£ / 





9ZI§ ps0I9y 
BBQ 104 






UONEWIOsU] 3UI}Xq 


pue auinjoa 04 4 





” 
fon 
= 
> 


© Copyright IBM Corp. 


LWAGId 


dai 


=a) 


/ Sig IGNnv TEWNVEOV 
AEN a . ea 
vt TaNy HOW 

qdovi 
U 9 4stsoy 
tt 





UOYEWIOJU] YUIRXA 


pue sumo, 104 ‘ 


aZIS pl009y 
xopuy Jog 











LY26-3907-1 1974,1985 


MVS/7XA VSAM Logic 


16 


C 


Restricted Materials of IBM 
Licensed Materials =~ Property of IBM 


Notes for Diagram AC4 
28 IDAO192F: OPNBASE, BLDAMBL, CHNAMBL, 
VATUPD 


Unless the user ACB indicates that a 
catalog is to be opened or that a 
catalog recovery area is to ba built 
in system storage (SCRA), tha AMBL 
is added to the chain and its 
address is added to the valid-AMBL 
table. The VAT is used for checking 
AMBLs for validity. AMBLVC 
identifies the VAT and the entry in 
the VAT that contains the address of 
the AMBL. 


29 IDAO192F: CHNAMBL 
30 IDAOL92F: CHNAMBL 


The AMBL is put on the secondary 
chain, off the primary AMBL for the 
base cluster. 


31 IDAO192F: BLDCMB 


32 IDA0192B, IDA0192C: OPCATI 
(calls LOC2 and LOC3) 


A separate CTGFL is built for each 
catalog racord field requested by 
VSAM Open. A CTGFL gives the 
field's length and its address in 
the open work area. 


For details about the data set 
catalog record, the CTGPL, and the 
CTGFL, see i i 
Reference. 


33 IDA0192B, IDA0192C: LOC2, LOC3, 
DATESTAMP 


The index catalog record is pointed 
to by the cluster catalog record. 
See j j for 
details about the index catalog 
record. 


A user replaceable module, IDATMSTP, 
sets a return code of 0 that causes 
IDA0192B to skip the processing of 
the last~referenced date (DSIREFD) 
in the DSCB1 for the data component 
of VSAM data sats cataloged in an 
ICF catalog. A return code of 4 
would cause datestamp processing to 
bea performed. 


34 IDA0192B 
A volume mount table must exist for 


each device type required by the 
cluster. 
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36 


37 


38 


39 


IDA0192Z, IDAO192Y, IDAOL92W 


The following figures in "Data 
Areas" show the VSAM control block 
structure: 


® VSAM Control Block Structure for 
: oye eauenees Data Set (VSAM 
ser 


e VSAM Control Block Structure for 
a Key-Sequenced Data Set 
Accessed through a Path 


Shared VSAM Control Block 
Structure for a Key-Sequenced 
“air Set Accessed through Two 

aths 


° Data AMB Control Block Structure 


° Alternate-Index AMB Control 
Block Structure 


° Index AMB Control Block 
Structure 


° Shared Resources Control Block 
Structure 


e AMB Control Block Structure with 
Shared Resources 


"Data Areas" also describes each 
VSAM control block. 


IDA0192B 


If the caller was VSAM restart, the 
return Cregister 14 in the caller's 
standard save area) will be to 
IDAOAQ5B. 


If the caller Cissuer of SVC 19) is 
authorized, and if ACBICI an 

aga were specified, then AMBLFIX 
is set. 


IDAO192F: OPNBASE, PAGEFIX 


The user must be authorized to have 
pages fixed in real storagethe 
Program must be in supervisor state 
with protection key 0 or link-edited 
with APF authorization. 


All storage identified by the 
cluster management block is fixed. 


IDAOI92F: GPNBASE 
The internal ACB and AMBL are used 
for gaining access to tha base 


cluster through a path via the 
alternate index. 
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Notes for Diagram Ac5 upgrading an oreenere index that {s 
already open for processing by way 
460 IDAOL9SZF: OPNUPGR of a path, IDA01L92Y builds the PLU, 
( BUFC, IOMB, IOSB, CPA, and buffers. 
The upgrade table contains an entry These control blocks are dascribed 
for each alternate index in the in "Data Areas." 


upgrade set. 
41 YIDAO1L92F: OPNUPGR, BLDAMBL 
An RPL, an ACB, and an AMBL are 


463 IDAOLOZF: BLDCMB 
64 See notes for steps 32 and 33. 


built for each alternate index. 65 See note for step 34. 
462 IDAOL9ZF: OPNUPGR 66 See note for step 35. 
The AMBLs for paths already open in 467 IDAG192B 
the job step are searched for the 
alternate index being processed. If called from VSAM restart, the 
return Cregister 14 In the caller's 
IDA0192ZY ot aneare save area) will be to 


To provide an additional string for 


C 
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OPEN THE ALTERNATE INDEX ASSOCIATED WITH PAT 


VSAM_ OPEN: 


DIAGRAM AC6. 
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Notes for Diagram AC6 
48 IDAO192F: OPNPATH, BLDAMBL 


The AMBL is chained off the current 
AMBL for the base cluster. ts 
address is added to the valid~AMBL 
table. The VAT is used for checking 
AMBLs for validity. AMBLVC 
identifies the VAT and the entry in 
the VAT that contains the address of 
the AMBL. 


49 IDAO1L92F: CONPATH 
The alternate index is already open 
for this path if one of the path 
AMBLs contains the same ID as this 
alternate index. 

50 IDAQ192F: OPNPATH 


The AMBL is chained off the existing 
AMBL for the path. 


51 IDAOL92F: CONPATH 


The alternate index is already open 
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54 
55 
56 
57 


for upgrading if one of the AMBLs 
Pointed to by the upgrade table 
contains the same ID as this 
alternate index. 


IDAOL92F: CONPATH 

For each string required for 
processing the path, IDA0192F builds 
the PLH, BUFC, CPA, IOMB, IOSB, SRB, 
and buffers. These control blocks 
are described in "Data Areas." 
IDA0192F 

If called from VSAM restart, the 
return Cregister 14 in the caller's 
standard save area) will be to 
IDAOAOSB. 

See notes for steps 32 and 33. 

Sea note for step 34. 

See note for step 35. 


See note for step 53. 
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Notes for Diagram AC7 


58 
59 


60 


61 


63 
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IDAOL92A: UPSMF 
IDA0192S 


For details about SMF record type 


TERMIL9ZA, 


1es. 


62, see System Management 
Faciliti 


IDAOQ192Z2A: TERM192A, CLNUP, VSICLNUP 
CLNUP resets open indicators in the 
VSAM catalog for data sets that were 
processed. It unchains AMBLS and 
deletes entries from the valid-AMBL 
table. It unchains DEBs. It 
decrements any use counts that were 


incremented. 


CLNUP deletes all volume mount table 
entries that were added. 


If an error has occurred during 
Open, VSICLNUP is called by CLNUP to 
chain and free the VSIs. 


IDAQL9OZA: DEQBUSY 


A DEQ is issued for each data set 
that was enqueued busy Cin step 16) 
to allow other tasks to open them. 


IDAO192A 


If the ACB is opened successfully, 
the VSAM Open routine sets the ACB's 
open bit CACBOFLGS) on. If an error 
occurs While opening an ACB, the 
VSAM Open routine or the control 
program Open sets the appropriate 
error flag. 


The VSAM Open routine returns 
control to the control program Open 
by putting the identifier of the 
Open final termination routine, 
C'8N', in the WTG table and 
transferring control (through the 
IECRES macro) to the 
Open/Close/End-of-Volume resident 
routine. The resident routine 
examines the open parameter list 
and, if all ACB entries have been 
processed by the VSAM Open routine, 
raturns to the Open final 
termination routine. If not, the 
next ACB entry in the open parameter 
ao: is processed (return to step 


Open modules CIFGO1L96V and IFG0196W) 
ensure that an ACB entry in the open 
parameter list is not processed by 
any access mathod executor routine. 


IFGO196V sets the identifier for 
rpg VSAM ACB entry in the WTG table 
o (0. 


IFGOLJ6W sets the identifier for 
each VSAM ACB entry in the WTG table 
to C'8N', the identifier of the Open 
final termination routine. 
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IFGO198N sets the return code in 
register 15 


See "Diagnostic Aids" for details 
about the VSAM Open return codes. 


IDAO192I: OPENACB 


The ISAM-interface Open routine sets 
the DCB open bit (DCBOFLGS) to 1 if 
the DCB's associated ACB was opened 
correctly. 


IDAO0192I: DCBMERGE, AMSMERGE, 
VALIDCHK 
See the microfiche for 


Data Areas 
details about the DCB. 
IDA0192I: DCBEXIT 


Register contents passed to the 
user's DCB exit routine are: 


e Rl: address of DCB 
e R2 through 13: User's registers 


e R14: return address 


e R15: address of user's DCB exit 
routine 
IDAQ192I: BFRMERGE 


Merge buffer-related information 
into the DCB. 


IDAOL92I: BUILDDEB 


The ISAM~interface Open routine 
builds a DEB so that: 


e There is meaningful DEB 
information for the user's 
program to examine; 


e The DEB fields on which COBOL, 
PL/I, and ISAM system integrity 
routines depend are properly 
initialized; 


e The checkpoint/restart or 
abnormal end (ABEND) routines 
can examine the task’'s DEB chain 
and close all of the user's DCBs 
and ACBs; and 


e The user's program cannot modi fy 
the IICB address or other fields 
in the DEB. 


The DEB's ISAM-interface indicator 
iS now set on. 


see the Data Areas 
details about the DCB, 


IFGO192I: LOADMOD 
Each DCB module-address fiald 


addresses an [SAM-interface 
processing routine that will 


microfiche for 
DEB, and TCB. 
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translate an ISAM record-processing 
request into a VSAM request. 


The ISAM SYNAD routine is loaded 
when it is specifiec in the user's 
JCL AMP parameter. 


The EXLST Cbuilt in step 2) 
addresses ISAM exit routines. 


For details about the EXLST>, see 
"Data Areas." 


The DEB (built in step 68) is 
initialized to point to the 
ISAM-interface FREEDBUF routine. 


IDA0192I: BLDRPL, INITRPL, BLDBUFR 


RPLs and ISAM-interface buffers are 
built for each ACB (the number of 
RPLs and buffers is based on the 
ACB's STRNO value for BISAM; one of 
each is built for QISAM) that the 
ISAM user opens. 
the ISAM-interface buffers are to 


support ISAM locate mode and dynamic 


buffer processing. 

IDAOI92I: DCBINIT 

When ISAM-interface Open processing 
completes, the DCB open flags 
CDCBOFLGS) field contains: 

® Busy bit on (seat to 0) 


e Open bit on (set to 1) 
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e Lock bit off (set to 1) 


Open modules CIFG0196V and IFGO196W) 2 


ensure that a DCB for a VSAM entry 


in the open parameter list is not 
Processed by any access method 
executor routine. 


IFGO196V sets the ID field for each 
oa i iota entry in the WTG table 
o 0. 


IFGO196W sets the identifier field 
for each DCB-for-VSAM entry in the 
the identifier 


CIFGOL98N). 


IFGO198N sets the return code in 
register 15. 


If the ACB (built by the 
ISAM-interface Open routine in step 
2) is not opened correctly by the 
VSAM Open routine, the 
ISAM-interface Open routine sets the 
DCB open bit to 0 (DCBOFLGS) and 
sets all DCB module-address fields 
If the user's ISAM program 
issues an ISAM record processing 
request without confirming that the 
DCB is successfully opened, an abend 
0C4 (caused by a branch to address 
000) results. 
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Notes for Diagram ADL 


If the DCB data-set organization 
(DCBDSORG) field indicates that an ACB 
is being processed 2nd if the DEBFLGS1 
field Cin the DEB) indicates 
ISAM-interface processing, Close modules 
CIGC00020 and IFGO200V) do the 
following: 


IGC00020: Bypasses purging of the 
outstanding EXCP requests. 


IFGO200V: Bypasses DSCB processing and 
transfers control to the ISAM-interface 
Close routine, IDA0200S. 


1 IDAO02Z00S: FLUSHBFR 


The ISAM-interface Close routine 
issues a SYNCH macro ts transfer 
control to the ISAM-interface Load 
routine, which issues the final PUT 
Si dag if all of these conditions 
exist: 


@ The DCB was opened for output in 
the locate mode and a PUT 
request was issued prior to the 
CLOSE request Cindicated in the 
DCBMACRF field). 


° No errors occurred (Cindicated in 
the DCBEXCD field). 


e The ACB associated with the user 
program's DCB was not previously 
closed Cindicated in the 
ACBOFLGS field). 


For details about the ACB, see "Data 


Areas." 
For details about the DCB and the 
DEB, see the Debugging Handbook and 


Data Areas microfiche. 
2 IDA0200S: DELETRTN 


The ISAM-interface Close routine 
resets each DCB module address 
field. Virtual storage for the 
routines is released to the system 
by issuing a DELETE macro against 
the ISAM-interface routines that 
were loaded by ISAM-interface Open 
processing. 


3  IDA0Q200S: CLOSEACB 


The ISAM-interface Close routine 
issues a CLOSE macro (SVC 20) to 
close the VSAM ACB. 


Close modules (IGC00020 and 
IFGOZ00V) allow an ACB to be closed 
and copy it into the Close work 
area. 


IGC00020 bypasses the DEB validity 
check and the purging of outstanding 
EXCP requests and, if a catalog is 
being closed, calls IFGO200N to 
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locate the TIOT entry and read the 
JFCB for the catalog ACB. 


IFGO200V reads the JFCB for 
noncatalog ACBs and tests for the 
user program's diagnostic options 
(that is, Generalized Trace 
Facility), and sets the ID field for 
each ACB entry in the WIG table to 
C'OT', the identifier of the VSAM 
Close module. 


VSAM Close Processing 
The input is from IFGO200T. 
4 IDAOZOOT: INITZ00T, GETCORE 


The module work area and the close 
work area are built 


If neither a catalog nor a catalog 
recovery area in system storage (SCRA) 
is being closed, the dummy DEB is 
verified. Unless a dummy data set is 
being closed, IDA0200T CENQFUNC, 
ENQINIT, PARMINIT) builds an EN@Q 
parameter list and issues EN@ for every 
data set associated with the user ACB. 
The parameter list indicates ‘'SYSVSAM' 
as the major resource and data sat name, 
catalog name, rname length, data set 
name length, catalog name length, and 
"B’ Cbusy) as the minor resource. 


6 IDAOZOOT: FLQUIS, ENDIO 


If the close is not for an ABEND and 
is not for improved control-interval 
access to load a data sat or process 
the mass storage volume inventory 
data set, the data set is flushed 
and quiesced (that is, any I/0 
activity yet to be done or already 
started is done): 


An inner RPL is built and pointed to 
the user ACB. The PLH chain is 
searched for PLHs connected to the 
user ACB. The inner RPL is 
connected to each PLH and an ENDREQ 
macro is issued. No record is 
returned for an incomplete input 
request (GET or POINT). The output 
buffer is written to the VSAM data 
set for an incomplete output request 
CPUT or ERASE). After I/0 
completes, the inner RPL is freed. 
IDAOZO00T: CLSPATH calls IDAQZ00B 


7 IDAO2ZOOT: CLSPATH calls IDA0200B 


The alternate index in a path is 
closed before the base cluster. See 
Diagram AD2. 


8 IDAOZO00T: CLSBASE calls IDA0O200B 


The cluster being closed may be a 
base cluster (part of a path), a 
cluster that was not processed 
through a path, or an alternate 
index that was itself processed by 
the user. See Diagram AD3. 
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IDAO2Z00T: CLSPHERE user is closing an ACB. See 


Diagrams AD4 and AD5. 
This processing is not done if an 
ACB for the cluster is still open. 10 IDAOZO0T: FREECORE, TERM2Z00T } 


For example, two users may have been 
processing a cluster, and the first For a description of termination 
processing, see Diagram AD?7. 


J 
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IDA0200T 


When an upgrade AMBL exists for the 
alternate index being closed, a 
partial close is indicated for 
Diagram AD6 processing. For a 
partial close, only the string 
blocks for the path, not for the 
upgrade set, are closed. 


For a primary close, the last user 
is closing an ACB for the base 
cluster——no primary AMBL or related 
control blocks need be kept for 
further user processing. 


1974,1985 


i5 


17 
18 
20 


IDA0200T 


For a secondary close, at least one 
more user still has an ACB open for 
the base cluster—the primary AMBLs 
and related control blocks must be 

kept for further user processing. 


See note for step 15. 

See Diagram AD6. 

IDAOZ00T: FREECORE, RMOVAMBL 

The AMBL entry is removed from the 


valid-AMBL table and the storage for 
the AMBL is freed. 
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Notes for Diagram AD3 


The cluster being closed can be a 
base cluster that was being 
processed through a path, a cluster 
that was not being processed through 
a path, or an alternate index that 
was itself processed by the user. 


24 IDAOZ00T 


For disconnecting the AMBL and 
changing AMBL pointers (step 26), an 
ENQ is issued to exclusively control 
the resources for the job step. 


26 IDAOZO0OT 
After AMBL pointers are changed, a 
DEQ is issued to free the resources 
for the job step. 


28 See note for step 15. 


LY26-3907-1 © Copyright IBM Corp. 1974,1985 


29 


31 


32 


33 


Sea the explanation for a primary 
close in the note for step 12. 


IDA0Z00T 


The inner ACB is used because the 
user ACB contains parameters for 

closing a path, not for closing a 
base cluster. 


IDAQNZOO0T calls IDAO2Z00B 
See Diagram AD6. 
IDA0Z00T: RMOVAMBL 


If there was no error, register 2 1s 
pointed back to the user ACB. 

Unless a catalog, a catalog recovery 
area in system storage (SCRA), or 
the mass storage volume inventory 
data set is being closed, the AMBL 
is removed from the valid-AMBL 
table. 
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Notes for Diagram AD4 the sama UCB as that indicated in 


the volume mount table. 
35 IDAOQZ00T: CLSUPGR 
( If neither a catalog nor a catalog 


37 IDAOZOOT: CLSUPGR recovery area is being closed and 
restart isn't indicated, the UCB use 
After the last upgrade alternate counts in the voluma mount table are 
index is closed, register 2 is decremented for those volumes with 
pointed back to the user ACB. valid serial numbers. 
38 IDAQZOOT calls IDAO0200B 43 IDAOZ00T: FREECORE 
See Diagram AD6. 44 IDAOZ00T: RMOVAMBL 
40 IDAOZO00T: RMOVAMBL 45 IDAOZOOT: FREECORE, FREESPHR 
42 IDAOZOOT: VMTPROC, DCRUCBCT For information about the sphere 
block and the protected sphera 
Use counts are decremented one way block, see "Virtual-Storage 
for closing a catalog and another Management" in "Diagnostic Aids." 


way for closing other data sats: 
48 IDAOZ00T: FREECORE 
For closing a catalog, the UCB use 
count is dacremented if the UCB The base information block is 
indicated by the task I/0 table is described under "Virtual-Storage 
Management" in "Diagnostic Aids." 
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Notes for Diagram AD5 
51 IDAOZ00T 


The VAT use count in the valid-AMBL 


table is decremented by one. 
IDA02Z00T 


The VSRT use count in the 
access-method control block 


52 


structure block and in the VSAM 


global termination table is 
decremented by one. 


The AMCBS is described in Catalog 


Diagnosis Reference. 
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54 
55 


56 


57 


IDAO02ZOOT: REMVGTT, FREVGTT 
IDAOZO0T: GSRDUMP, SDLOAD 


"Recovery with Global Shared 
Resources" in "Diagnostic Aids” 
describes the dumping of control 
blocks. 


IDAOZO00T: FDLVRP calls IDAO192Y 
IDA0192Y issues the DLVRP macro. 
Forced deletion is discussed under 
"Recovery with Global Shared 
Resources" in "Diagnostic Aids." 


IDAO2Z00T: FDLMSG calls IDA0192P 
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Notes for Diagram AD6 


58 IDAOZOO0B: INITZO00B, VALCHECK, PROBDT 
(calls IDA0192P) 


The DEBCHK SVC is used to check the 
validity of DEBs. 


59 IDA0Q200B: WRITBUFR, GETCORE, 
WRBUFFER, CBINIT, FREECORE, PROBDT 


Inner control blocks are built and 
the WRIBFR macro is issued to write 
data still in buffers. 


60 See the explanation for a primary 
close in the note for step 12. 


60a IDAOZ00B: UPCBSVSI 
Update the ARDB and AMDSB from the 
VSI so that the VSAM catalog update 
will have the latest information. 
61 IDAOZO0B: SHARE, SHAREDEQ, VSIPROC 
DEQ is issued. 


62 IDAO200B: UPCATACB, UPCATDE@ (calls 
IDA0192C), PROBDT 


Catalog records are described in 
Catalog Diagnosis Reference. 


63 IDA0200B: VMTPROC 
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65 


66 
67 


68 


69 


70 


IDAO2Z00B: UPSMF (calls IDA01928) 


One SMF record type 64, is written 
for each AMB (for data set or index) 
connected to the ACB‘s AMBL. 


For a description of SMF record type 
64——Data Set Status, see System 


Management Facilities. 


For details about the AMDSB, AMB, 
AMBL, and ACB, see "Data Areas.™ 


See note for step 15. 

See the explanation of a partial 
close in the note for step 12. If 
neither a partial nor a secondary 
close 1s being done, a primary close 
is being done. 

IDAO0200B: DEHOOK 


The DEBCHK SVC is used. It removes 
VSAM DEBs from the TCB DEB chain. 


IDAOZO0OB: VIRTPROC (calls IDA0192D) 
IDA0192D destages data from the 
direct-access storage staging drive 
to mass storage. 


IDAOZO0B: CBRELE 
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Notes for Diagram AD7 


C 71 


72 


73 
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IDA0200T: DEHOOK, DECHNDEB 
IDAO200T calls IDA0192C 


If a catalog is being closed, 
IDA0192C issues a dummy LOCATE to 
indicate that the closing of the 
catalog is complete. 


Unless a dummy data set has been 
closed (see note between notes for 
steps 4 and 6), a DE@ parameter list 
is built and a DEQ is issued for 
every data set associated with the 
user ACB. The parameter list 
indicates "'SYSVSAM' as the major 
resource and data set name, catalog 
name, rname length, data set name 
length, catalog name length, and 'B' 
(busy) as the minor resource. 


IDAO2Z00T: RESTORE 


The ACB condition before it was 
opened is: 


e Open bit CACBOFLGS) is off. 


e Address of the VSAM interface 
routine (CIDAO019R1) is O. 


e Address of the AMBL jis 0. 


e DDNAME field contains the DDNAME 
from the TIOEDDNM field in the 
TIOT DD entry. 


IDAOZ00T: FREECORE 


The storage for the close work area 
and the module work area is freed. 


IDAO200T 


The VSAM Close routine sets the 

ACB's open bit CACBOFLGS) off if the 
ACB is closed successfully. If an 
error occurs while closing an ACB, 
the VSAM Close routine or the 
control program Close sets the 
appropriate error flag. 


The VSAM Close routine returns 
control to the control program Close 


1974,1985 


77 


78 


79 


by putting the identifier of the 
Close final termination routine, 
X'2L', in the WTG table and 
transferring control (Cthrough the 
IECRES macro) to the 
Open/Close/End-of-Volume resident 
routine. The resident routine 
examines the close parameter List 
and, if all ACB entries have been 
processed by the VSAM Close routine; 
returns to the Close final 
termination routine. If not, the 
next ACB antry in the close 
parameter list is processed Creturn 
to step 4). 


Close moduias CIFGO208W ana 
IFGO200Y) ensure that an ACB entry 
in the close parameter list is not 
processed by any access method 
executor routine. 


IFGOZ200W sats the identifier for 
rae VSAM ACB entry in the WTG table 
o 0. 


IFGO2ZO00Y sets the identifier for 
each VSAM ACB entry in the WTG table 
to C'2L', the identifier of the 
Close final termination routine. 


IDA0200S: FREEBFRS, FREEDEB, 
RESETDCB, FREEWA, FREEMAIN 


The ISAM-interface Close routine 
releases the virtual storage 
obtained for the ACB, the IICB, 
DEB, the RPLs, and the 
ISAM-interface buffers. 


IDA0200S: RESETDCB 


the 


The DCB conditions before open are: 


° DCBOFLGS: Open bit off, lockbit 
off (set to 1), and busy bit off 


° DCBDSORG: ISAM-interface bit off 


IFGO202L sets the return code in 
register 15. 


For details about the VSAM Close 
return codes, see "Diagnostic Aids." 
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Notes for Diagram AEl 
The input is from IFGO231T. 
2 IDAOZS1T: INITZ31T, GETCORE 


The module work area and the close 
work area are built. 


The dummy DEB is verified. Unless a 
dummy data set is being closed, IDA0231T 
CENQFUNC, ENQINIT, PARMINIT) builds an 
ENQ parameter list and issues ENQ for 
every data set associated with the user 
ACB. The parameter list indicates 
"SYSVSAM' as the major resource and data 
set name, catalog name, rname length, 
data set name length, catalog name 
langth, and 'B' (Cbusy) as the minor 
resource. 


4 IDAO2S1T: FLQUIS 


If the CLOSE (CTYPE=T) isn't for 
restart or checkpoint with local 
shared resources, the data set is 
flushed (that is, any I/0 activity 

ee < be done or already started is 
one): 


An inner RPL is built and pointed to 
the user ACB. The PLH chain is 
searched for PLHs connected to the 
user ACB. The inner RPL is 


LY26-3907-1 © Copyright IBM Corp. 1974,1985 


connected to each PLH and a FRCIO 
macro 1s issued. No record is 
returned for an tncomplete input 
request (GET or POINT). The output 
buffer is written to the VSAM data 
set for an incomplete output request 
(PUT or ERASE). After I/0 
completes, the inner RPL is freed. 


IDAO2Z31T: TCLSPATH calls IDAO231B 
The alternate index in a path is 
closed (TYPE=T) before the base 
cluster. (See Diagram AE2.) 
IDAO2Z31T: TCLSBASE calls IDAO0231B 
The cluster being closed (TYPE=T) 
can be a base cluster (part of a 
path), a cluster that wasn't 
processed through a path, or an 


alternate index that was itself 
Eocene by the user. (See Diagram 


IDAO2Z31LT: TCLSUPGR calls IDAO231B 
(See Diagram AE2.) 
IDAQO2Z31T: FREECORE 


The storage for the close work area 
and the module work area is freed. 
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Notes for Diagram AE2 
Close (TYPE=T) the Base Cluster 


The cluster being closed (TYPE=T) can ba 
a base cluster that was being processed 
through a path, a cluster that was not 
being processed through a path, or an 
alternate index that was itself 
processed by the user. 


13 IDAO231T: TCLSBASE 
The inner ACB is used because the 
user ACB contains parameters for 
closing a path, not for closing a 
base cluster. 

14 IDAO0231T: TCLSBASE calls IDAO0231B 

Close (TYPE=T) Upgrade Alternate Indexes 

16 IDAO0231T: TCLSUPGR 
After the last upgrade alternate 
index 1s closed (TYPE=T), register 2 
15 pointed back to the user ACB. 

17 IDAO231T: TCLSUPGR calls IDA0231B 


Close (TYPE=T) the Cluster 
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IDAO231B: INITZOOB, VALCHECK, PROBDT 
(calls IDA0192P), ERRORFLG 


The DEBCHK SVC is used to check the 
validity DEBs. 


IDAO231B: WRITBUFR, GETCORE, 
WRBUFFER, FREECORE, PROBDT, ERRORFLG 


Inner control blocks are built and 
the WRTBFR macro is issued to write 
data still in buffers. 


IDAO231B: VIRTPROC calls IDA0192D 
IDA0192D destages data from the 
direct-access storage staging drive 
to mass storage. 


IDAO02Z31B: UPCATACB, UPCATDEQ 
(calls IDA0192C), PROBDT, ERRORFLG 


IDAO0Z31B: UPSMF calls IDA01925S 

One SMF record type 64 is written 
for each AMB (for data set or index) 
connected to the ACB's AMBL. 


For a description of SMF oe type 
64——Data Set Status, sea 


Management Facilities. 
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Notes for Diagram AF 
BLDVRP 


1 


IDAO192Y: DBDCVAL 


BLPRM is the BLDVRP parameter list. 
There must bea no conflicting 

a al and buffer sizes must be 
valid. 


IDA0192Y: 
IDAO192ZY: 


The VSAM shared resource table is 
initialized to receive pointers in 
subsequent processing. The control 
block structure for processing with 
shared resources is illustrated 
under "Control Block 
Interrelationships" in "Data Areas." 


BLDVAT 
BLDVSRT 


IDAO0192Y: BLDWSHD 

5 IDAO192Y: INITPLHP 
IDAO0192ZY: BLDBUFC 
IDA0192Z2Y: BLDVRP 
The address of the VSAM shared 
resource table is put into the 
valid~AMBL table. If this chaining 
cannot be done, the DLVRP procedure 
gets control to delete the resource 
pool. 

“Sw =DLVRP 

4 There must be no conflicting 
parameters and no ACBs open to use 
the resource pool. If an ACB is 
open to use it, the DLVRP is 
rejected. 

9 If DLVRP is issued without a 
previous BLDVRP, there is no VSAM 
shared resource table. 
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10 IDAO192Y: DELVRP 

11 IDA0192ZY: FREEVSRT 

Forced Dalation of a Global Resource 
Pool 


When the task that issues BLDVRP to 
build a global resource pool terminates 
Without issuing DLVRP, the control 
program forces deletion of the resource 
pool. Forced deletion of a global 
resource pool is described in Diagram AH 
and under "Recovery with Global Shared 
Resources" in "Diagnostic Aids." 


IDAOCEA4““BLDVRP/DLVRP ESTAE Routine 


IDAOCEAS is a CSECT in load module 
IFGO192A. The recovery termination 
manager Can ESTAE routine, also called 
the I/0 support recovery routine) 
receives control for an error that 
occurs in BLDVRP/DLVRP processing and 
gives control to IDAOCEA4S for a program 
check, SVC 13, or abnormal termination. 


Unless an SDWA (CSTAE diagnostic work 
area, also called RTCA~-recovery 
termination communication area) is 
passed, IDAOCEA4 returns to the recovery 
termination manager without processing. 


SDWA contains the address of a pseudo 
FORCORE area that was built during 
BLDVRP/DLVRP processing. IDAOQCEAS uses 
portions of FORCORE for recovery. 


IDAOCEA4 passes control to IDAOCEAI for 
error recording (see Diagram AG). 
IDAOCEA4 initializes registers for 
transferring control. Register 8 
contains the address of a dummy common 
O/C/EOV recovery routine parameter list 
(mapped by IECRRPL) in the pseudo 
FORCORE. Register 13 contains the 
address of a register save area in the 
pseudo FORCORE. 
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Notes for Diagram AG 


The VSAM data-~set management recovery 
routine CIDAOCEA1) runs under the direct 
control of either the O/C/ZEOV recovery 
routine or the BLDVRP/DLVRP ESTAE 
routine CIDAOCEA4), each of which is an 
ESTAE routine. IDAOQCEA1 causes logging 
of information that indicates the 
processing that preceded the error. See 
"Open, Close, and End-of-Volume 
Diagnostics" in "Diagnostic-+Aids" for a 
discussion of dumps associated with 
errors in Open, Close, and End of 
Volume. 


1 IDAOCEAL 


RRFAMSTR equal to 0 indicates that 
neitther VSAM nor ISAM-interface 
processing was involved in the 
error. 


3 IDAOCEAL] calls IDAICIAI1 


IDAICIA1L frees the ISAM-interface 
work areas when the error cannot be 
recovered from and records 
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information in the SYS1L.DUMP of the 
SYSABEND data set. IDAICIAI is 
discussed further under "Open, 
Close, and End-of-Volume 
Diagnostics" in "Diagnostic Aids." 


IDAOCEAL 


If the name of the module or of the 
CSECT can't be determined, the name 
IDA0192X is indicated. If the error 
occurred while control was being 
passed between IFG0192A and the main 
load module IDA0192A, the nama 
"IDAQDbbbb" is indicated. 


The indicators set in SDWA are 
discussed in detail under "Qpen, 
Close, and End-of-Volume 
Diagnostics" in "Diagnostic Aids." 


IDAOCEAL 


"IDAOQCEA1' is indicated, unless it 

received control from IDAOCEA4, in 

which case 'IDAOQCEA4’ is indicated. 
CIDAOCEA4 is described in Notes for 
Diagram AF.) 
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Notes for Diagram AH1 


The VSAM task Close executor (CIDAOCEA2) 
gets control from the data management 
resource manager CIFGOTCOA, also called 
task Close) for normal or abnormal 
termination of a task or of an address 
space, including "out-of-storage™ abend. 


1 IDAOCEA2 

2 IDAOCEA2: JSTERM 
RMPLTCBA gives the location of the 
terminating TCB. TCBOTC indicates 


whether the region control task is 
being terminated. 
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oo aon ff US 


IDAOCEA2: 
IDAOCEA2: 
IDAOCEA2 

IDAOCEA2: 
IDAOCEA2: 
IDAOCEA2 

IDAOCEA2: 
IDAOCEA2: 


JSTERM calls NMEMTERM 
JSTERM calls FALLVGTT 


AMEMTERM calls FALLVGTT 
AMEMTERM calls SCANGSR 


NMEMTERM calls FALLVGTT 
NMEMTERM calls SCANGSR 
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Notes for Diagram AH2 
12 IDAQOCEA2: FALLVGTT 


If master memory (CASIDI1) is calling 
VSAM task close, then the VGTTs are 
not freed. 


The pointer in the address~space 
control block to the first VGTT in 
the chain of VGTTs 1s removed. 
MWANVGTT is pointed to the first 
VGTT to make a local VGTT chain. 


In processing each VGTT in the chain 
(steps 13-16), it is made the current 
VGTT by pointing MWANVGTT to the next 
one, until there is no next one Cin 
which case, MWANVGTT is set to 0). 


13 IDAOCEA2: FALLVGTT calls VDECHAIN, 
which calls DECGVSRT 


If the AMCBS VSRT use count for the 
particular key isn't 0, it is 
decremented by the amount in the 
current VGTT. If the use count 
becomes negative, it is set to 0. 


14 IDAOCEA2: FALLVGTT calls FOPEN, 
which calls FREECORE 


A data set may not be closed because 


it was only partially opened or End 
of Volume or Close failed. The 
header elements in header element 
blocks describe storage that has 
been obtained for each data set. 
"Virtual-Storage Management" in 


"Diagnostic Aids™ describes HEBs and 


indicates which subpools contain 
each type of control block. 


LY26-3907-1 


© Copyright IBM Corp. 1974,1985 


15 


16 


17 


FOPEN uses the GDT (global data 
table) to determine the address 
boundaries of global storage. If 
there is a protected sphere block, 
FOPEN processes each header element 
in it, using HEBCNT as an index. If 
the storage indicated in a header 
element is within the boundaries of 
global storage and in subpool 231, 
239, 241, or 245, FOPEN uses its key 
to free it. After all HEBs are 
processed, FOPEN frees the protected 
sphere block and the VGTT. 


IDAOCEA2: FALLVGTT calls FLSR, which 
calls FREECORE 


When a local resource pool is built 
(during BLDVRP processing), storaga 
in the system queue area is obtained 
for each trio of IOQSB-SRB-PFL, and a 
VGTT is prefixed to each. 


IDAOCEA2: FALLVGTT calls FCTLG 


At the end of Open processing for a 
catalog, a catalog recovery area in 
system storage, or the mass storage 
volume inventory data sat, Open 
frees the VGTT, so IDAOCEA2 cleans 
up for these only for termination 
that occurs during Open processing. 


IDAOCEA2: FALLVGTT calls FSBKR 


When obtaining storage for ECBs to 
use with ACQUIRE requests, IDA0192E 
concatenates a VGTT to tha ECB 
storage. If the SBKR request never 
completes, IDAOQCEA2 will free this 
subpool 241 storage. 
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Notes for Diagram AH3 


The address space that built the global 
resource pool, if there is ona, is 
responsible for delating it. If that 
address space tarminates without 
deleting the resourca pool, the global 
storage usad for it would ba lost to the 
system, unless a recovery routina forced 
its deletion. "Racovery with Global 
Shared Rasources" in "Diagnostic Aids" 
further discusses forced deletion and 
the dumping of control blocks for tha 
resource pool. 


18 IDAOCEA2: SCANGSR 
19 IDAOCEA2: SCANGSR 


VSRTASCB equal to the ASCB address 
of thea address space being 
terminated indicates that thea 
address space purlt the global 
resource pool. 


20 IDAOCEA2: SCANGSR 

22 IDAOCEn2: SCANGSR 
CBSVUSE equal to zero indicates that 
all data sets processing with the 


global resource pool have baen 
closed. 
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23 


24 


IDAOCEA2: SCANGSR calls FDLVRP 


FDLVRP calls GSRDUMP, which 
calls SDLOAD (which calls SDUMP) 


GSRDUMP passes to SDLOAD the address 
and length of each control block or 
storage area to be dumped. SDLOAD 
saves each raturn code from SDUMP; 
FDLMSG (step 25) examines the return 
codes to datermine what return code 
to include in the message to the 
operator. (Thea return code 
indicates whether all, some, or no 
areas were dumped. ) 


(Areas dumped and messages are 
discussed under "Recovery with 
Global Shared Resources" in 
"Diagnostic Aids.) 

FDLVRP calls IDAO0192Y 


IDAG192Z2Y deletes the global resource 
pool. 


FDOLVRP calls FDLM8G, which 
calls IDA0192P 


See note about FDLMSG in step 23. 
IDA0192P suppresses the GTF trace 


and the construction of a message 
area. 
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Notes for Diagram AI 


When IHJACPO2 CIGC0206C) receives 
control after the caller issues the 
CHKPT macro (SVC 63), the DEB chain is 
scanned for a VSAM DEB. If any VSAM 
data sets are open, IGC0206C loads and 
branches to IDA0C06C. Standard linkage 
conventions are observed and register 1 
contains the address of the checkpoint 
Work area. IDA0CO6C obtains a module 
work area in subpool 252 and a work area 
for I/0 in subpool 250. 


1 IDAOCO6C: RECOVERY 


An ESTAE macro is issued to 

establish IDACKRA1L as the ESTAE 
routine. The parameter area to be 
passed to IDACKRAI is initialized. 
This parameter area consists of 
fields in a dummy Open work area 
used for compatibility with VSAM 
open modules. The fields in the 
work area are DXATCOM1 Cbase 
register), DXATCOM2 (data register), 
DXATCOMS Caddress of retry routine), 
DXATCOM4 Caddress of 
checkpoint/restart work area), 
DXATEXC1 (status information), and 
DXATEXC2 (last 4 characters of 
module in control). 


2 IDAOCO6C: BLDVCRT, GETCORE 


BLDVCRT calls GETCORE, specifying 
the minimum storage required to 
build the VCRT but requesting the 
maximum storage available for 
suballocation from a 4K-~-byte block 
in subpool 252. GETCORE returns the 
length actually obtained. 


The VCRT header is initialized and 
BLDOPEN is called. 


3 IDAOCO6C: BLDOPEN, TCLOSE 


Build an Open entry for avery 
primary AMBL in the sphere. Search 
the secondary chain for each primary 
AMBL to determina if an ACB was 
opened that raquired a higher level 
of authorization. The address of 
the AMBL with the highest level of 
authorization is replaced in the 
Open entry. A CLOSE CTYPE=T) macro 
is issued against the corresponding 
ACB if the AMBL is not the base AMBL 
accessed through a path. The 
maximum control interval size for 
the Open entries is set in the VCRT. 


6  IDAOCO6C: BLDVCRT 
If AMBCREAT is on in the AMB and if 
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AMDDST Ca KSDS) is on in the AMDSB, 
build the VCRT index entries. 


IDAOCO6C: BLDINDEX, IDXGET 


Build an index entry for every index 
create work area CICWA) that is in 
use. The index GET function of 
record management is used to save 
the control interval for each ICWA 
in use. 


IDAO0CO6C: BLDVCRT 


If BIBUPT in the BIB is nonzero, 
build the VCRT upgrade entrias. 


IDA0CO6C: BLDUPGRD 


Build an upgrade entry for avery 
upgrade table CUPT) entry. For each 
upgrade entry, set the VCRCISIZ 
field Cinitially set by BLDOPEN) to 
the CI size for the upgrade cluster 
or the current maximum CI size, 
whichever is greater. 


IDA0CO6C: BLDVCRT, GETRTN 


If the cluster was not open for 
create mode and it 18 an 
entry-~sequenced data set with 
repositioning requested, the current 
control interval is saved. The 
repositioning request will not be 
honored if the cluster is not open 
for output. The checkpoint will 
fail if an upgrade path exists and 
repositioning was requested. 


IDAOCO6C: HEBSAVE, BLDHEBS 


For every cluster in the sphere, 
save all the header elements with 
thea exception of the DEB block, the 
protected string block, and the 
protected upgrade string block. Tha 
address of the save area is placad 
in the VCRT upgrade entries and open 
entries, unless there is a 
corresponding upgrade entry for tha 
cluster. 


If one or more sphere blocks exist, 
save the header elements that are 
chained off BIBSPHPT. 


If the sphere was opened with the 
LSR option, save only the EDB block 
header elements. 


IDAOCO06C 


If there are no mora AMBLs on tha 
primary AMBL chain, module work 
areas are freed, registers are 
reloaded, and control is raturned to 
IGCO2Z06C. 
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Notes for Diagram AJ 


IGCONO6C is given control after the core 
imaga records (CIRs) have been written 
to the checkpoint data set. IDAOQI96C is 
loaded and branched to unconditionally. 
Standard linkage conventions are used, 
and register 1 contains the address of 
the checkpoint work area. 


1 IDAOI96C: RECOVERY 


Issue an ESTAE macro to establish 
IDACKRA1 as the ESTAE routine. 
Initialize the parameter area to be 
passed to IDACKRAI. 


2 If CKRETCOD in the aia work 
area is not zero or not X'10' 
bypass building the SSCR. 
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IDAOT96C 


Obtain storage for the VSAM SSCR 
from subpool 253 and place the 
address in the checkpoint work area 
CCKSSCR). Initialize the SSCR 
header and copy the JSCBSHR field 
for the data. 


IDACI96C: CLEANUP 


IDACI96C is an external entry called 
for cleanup processing by IDA0CO06C 
Cerror) and IDA0QA05B (normal). It 
is processed in-line by IDAODI96C 
(normal or error). If JSCBSHR is 
nonzero and an AMBL exists that 
points to a BIB (which in turn 
points to a VCRT), then the storage 
chain pointed to by the VCRT is 
freed and all pointers to VCRTs ara 
cleared in all BIBs. 
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Notes for Diagram AK 


IDAO0CO5B restores the address of the VAT 
in the JSCB, frees the DEBs for AMBs, 
and marks VSAM ACBs not closable by task 
close. IDAO0C0O5B is called from 
IGCONO5B. Standard linkage conventions 
are used, and register 1 contains the 
address of the restart work area. 


l IDAOCOSB: RECOVERY 
The ESTAE macro is issued to 
establish IDACKRA1 as the ESTAE 
routine. The parameter area is 
initialized. 

2 IDAOCOSB 
The SSCR and the address of the VAT 
are validity-checked. The JSCBSHR 
field is initialized from the SSCR. 

3 IDAOCO5B: FIXDEBS, DEBFREE 


The address of the DEB chain is 
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obtained from RSINT in the restart 
work area. A VSAM DEB is identified 
by X'01"' in DEBAMTYP. If the first 
byte contains X'A0', DEBDCBAD points 
to an ACB. 


If the first byte contains X'40', 
DEBDCBAD points to an AMB. 


If DEBDEBB is zero, the end of the 
DEB chain has been reached. 


The DEB extension 18 pointed to by 
DEBXTNP Coffset — 8). <A modeset to 
key 5 is done to issue the FREEMAIN. 


If DEBDEBB is zero, the end of the 
DEB chain has been reached. 


IDAOCO5B: FIXDEBS 


Set DEBXCDCB to indicate to task 
close not to close the VSAM ACB. 


If DEBDEBB is zero, the end of the 
DEB chain has been reached. 
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Notes for Diagram AL1 


IDAOAO05B constructs control blocks 
required by VSAM Open modules and then 
gives control to those modules to 
reestablish the control block structure 
and data set contents as required for 
repositioning. IDACOA05B jis called from 
IGCOTO5B. Standard linkage conventions 
are used, and register 1 contains the 
address of the restart work area. 


1 IDAOAD5B: RECOVERY 


An ESTAE macro is issued to 
establish IDACKRAI as the ESTAE 
routine. The ESTAE parameter area 
is initialized. 


2 The common Open work area and the 
VSAM Open work area are initialized. 
An enqueue parameter list is 
initialized for locking a cluster 
during restart Open processing. 


3 IDAOAOSB: BLDVSRP, IDA0192Y 
A BLDVRP parameter list is 


initialized and IDA0192Y is called 
to build the SRBs, IOSBs, and PFLs 


in global storage and to chain those 


blocks to the existing LSR pool. 
& IDAQAOSB: BLDVSRP, IDAO01L9OZY 


After the VATVSRT field is saved and 


cleared, BLDVRP function is used to 


build an LSR pool to use for all I/0 


during restart. One set of buffers 
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is obtained with the buffer size 
equal to the nearest 4K-byte 
multiple higher than the largest CI 
size for any cluster open in the 
memory. 


The Open work areas are initialized 
with information pertinent to the 
sphere currently being processed. 
The VMTs for the checkpointed 
structure are freed. 


For every user ACB open in the 
sphere, the JFCB is read into the 
common Open work area and IDA0192F 
is called to rebuild the VMTs and 
mount the volumes. 


IDAGAOSB: BLDOPEN, BLDUPGRD, 
IDA0192B, IDA0192Z, IDA0192Y, 
IDA0192C 


Before calling IDA0192B to 
reestablish enqueues and rebuild (Cor 
refresh) the control block structure 
for a cluster, the volume serial and 
high-used RBA are saved from each 
ARDB and the statistics fields are 
saved from the data Cand index) 
AMDSB. 


After returning from the Open 
modules, the AMDSB statistics are 
checked for modifications if 
AMP="'CROPS=NRC or NCK* was 
specified. The fields tested are 
AMDNLR, AMDIREC, AMDDELR, and 
AMDUPR. 
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REBUILD VSAM CONTROL BLOCKS 


VSAM _ RESTART: 


DIAGRAM AL2. 
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Notes for Diagram AL2 
8 IDAOQAOSB: REPOSITN, VERIFY 


Reposition any data set in create 
mode. Reposition any 
entry-~sequenced data set, unless an 
associated upgrade path is open or 
NRE or NRC is specified. Unless the 
SPEED option was specified when the 
cluster was defined, preformat the 
index component for a key~sequenced 
data set and the data component for 
an entry~sequenced data set. 


If the data set was not eligible for 
repositioning, SYNCH to record 
management to set the high used RBA 
(VERIFY). 


9 Free all EDBs saved from the 


checkpointed structure by scanning 
HEB save area headers for VCRHFREL 
being on. Free all save lists: 


The CSL chain i8 pointed to by 
BIBCSL. 


The DSL; ESL, SSL, and PSL 
chains are pointed to by their 
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10 


ll 


respective fields in the Open 
work area COPW). 


IDAQAOSB: FREECORE, IDA0192M 


Free all EDBs saved from the 

checkpoint control block structure. 

Call IDA0192M to free all excess 

oPeee in the sphere. Free all save 
ists. 


IDAGAOSB: DELVSRP, FIXDEBS, 
IDACI96C, IDA0192Y 


IDA0D192Y is called to delete the 
resource pool used by restart. 


The DEBS for the VSAM ACBs are moved 
to the top of the TCB DEB chain. 

The DEBXCDCB bit is reset to allow 
task close to issue a close against 
the ACB. 


IDACI96C is called to clean up the 
control blocks used by VSAM 
checkpoint/restart. 


If an error occurs during restart, 


message IHJO009I is issued and VSAM 
control blocks are not fixed. 
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Notes for Diagram AM 


IDACKRA1 performs ESTAE processing for 
VSAM checkpoint/restart. If an SDWA is 
available on entry, a message is 
formatted and an attempt is made to dump 
storage and exit to a retry routine. 


1 If an SDWA is not available 6 


Cindicated by register 0), control 
is returned to RIM so abnormal 
termination can continue. 


2 The message below is formatted in 
the SDWA. 


3 The SDUMP parameter list is moved to 
the SDWA and the SDUMP macro is 


If IDARCKPT in the ESTAE parameter 
list C€pseudo FORCORE) is on, 
checkpoint is in control. 


The return code, either 241 or 242, 
is set in the second byte of 
RSRETCOD. 


The message code, either 241 or 242, 
is set in the second byte of 
CKMSGCOD, and the return code, 
X'0c', is set in the second byte of 
CKRETCOD. 


If IDARCURS in the ESTAE parameter 
list is on, this is a recursive 
execution of the ESTAE routine. 


issued. 
MACHINE CHECK 
PROGRAM CHECK LOCATION=nnnnnn 
VSAM CHECKPOINT CIDAOxxxx ) RESTART KEY DEPRESSED 
RESTART PAGING ERROR 


ABEND Snnn,Unnn,REGISTER 15=nnnnnnnn 


LY26-3907-1 © Copyright IBM Corp. 1974,1985 


Method of Operation 67 


Restricted Materials of IBM 
Licensed Materials —- Property of IBM 


This page intentionally left blank. 


J 


J 


68 MVS/XA VSAM Logic LY26-3907-1 © Copyright IBM Corp. 1974,1985 


RECORD MANAGEMENT TABLE OF CONTENT 


Licensed Materials ~ Property of IBM 


Restricted Materials of IBM 


DIAGRAM B 


£AG WeBeig TAM WesdeIg TAG Weide 
Zuissa9 01g Zuissa201g Sulssa001g 


oseA o1deW oOnDtN 
AONVUOIV OOVLNW dV.LAND 


TLE Wesseig TLL wes3vig 
193fQO WVSA SUINJOA IXIN 





B 0} a98dS jeUOl) $,322f90 WVSA 
-Ippy 3unesoITy 94} 3ulUIe}QGO 


TOW weidseig 

SSW OS8E © YIM Supse501g (AjIpow) 10d weed 

Zulssa201g (,aasul]) 
o19eW Sulssad01g 





SUINJOA JO pug caaueaen aASVUd 10 LNd o1new Lad 
p10s0y xapu] 


ue 3unyids 





Ud wesdeig 
xopu] 

9) 8UJ3}[V 

ue Zulpei3dp 


Sq Wwes2e1g 
juawazeueW 


JajjING 


Od weizeigq 
Yyieq & 
Bulssad01g 


19 EEG pIOIOY saepey & SurAjyipop 10 Zuyneasy 






SHA weideig 





IINJINIS 
xapu] 94} pO wessed 
3unepdy 9INjJINIJS xapu] 





ue 3unepdy 


sounnoigns rofew pHa wezeig 
Basy jo1}U07) 


,8 B3unjyds 


9HE weiseig 
Alluq Xapu] 


£9q we3eig 
spi0.3ay Xapu] 
3uljeas) 


TOG wedeiq 
vary jo1Uu0D 
MAN © 3ul}}a5) 


ue Zulj19Su] 







€dd wesdeig 7Zdi Wes3eIg 1dd@ wes3eig 
ZuIssad01g 3uIss3901g Suissa01q 
oJIeW YUAGHOS ODEW UFGLUM] [OLDEW UAGHUW 





£HA wedeq 
SUOI}J3SU] 
103 29edS 
3uljeas-) 






[Dq weiseig 
Jeasa}uy [O1JU0Z 
MAN & 3ul}305 





| SOOINOSIY PoeYyS WLM Suissaco01g 


Taq wesdeig 
(pasuanb 
-ag Aay) 
S3ulssad014 
o1DeWw LAd 


€N@ wesdeiq 7NG Wesse1d ING wes3eiq 
(238935) BuIss2901g 

SuUISsIIOIg oO1.eW XILAD 

os2eWw LNd 30 LAD 


THE Weiseg 1TH weizeig 
(AjIpow) (349Su]) 
SuIssaz01g Zulss3501g 
o198W LAd o19eWw LAd 





32g RQ psouanbesg-Asy & BurAppo; Jag &}eq poousnbag-Aay e& Zunes 
Jeaiapuy JOU Aq Burssa001g 


wei3el qq Wweizeig 
OS ibSsOLi fq weideig [q@ wes3eig (paouanb ad wesgeiq Jq welded 


O1DeW Sulssa.01g SuIssaz01g -aS 41}uq) (jeijuanbas) (39911q) 


Buissax01g Zuissa201g 
O198 0198 : by 
OAUYGNA DEW LNIOd ew ASVUA egy, onew Lae D198 


Wg Wwes2e1q Iq weieig 
ZUISSI9I0Ig Zulssa001g 
AJTYNAA ODeW MIAHOD 





aq weed 
AADIAIIAO Nd wesdeg 
juaWwaseueW 998 J39}U] 


P1093 WWSA WVSI 





69 


Method of Operation 


© Copyright IBM Corp. 1974,1985 


LY26~-3907~1 


Restricted Materials of IBM 


Licensed Materials — Property of IBM 


VSAM RECORD MANAGEMENT OVERVIEW 


DIAGRAM BB 


fq weiseig :Buissad04q OLIDP I NIOd 





Iq Weideig /BUISSIIOLY OLIDW ASV UT 


(",,BUIssaD01g SS99DY [BAIO}JUJ-[O1}UO-),, OSTe 99g) 


ZOg weidseIg JOS BJLp P1OIII SATJETOI UI Sp1O901 BUTAJIPOU! OJ 


LOg Weiselg JOS BJLP P1OIII DATJE[II UT SPIOIII BUTPIOSUT IOFJ 


CHE Wesdeig jas BJep poouanbas-Aay UI Sp109a1 BUIAJIPOUW 10} 


[H@ weideiq Jas BJep paduanbas-Aay Ul SP1OD91 BUIJIISUT JO} 


Aq wesdeid JaS BJP paduanbas-Aay Butyjeasd 104 


qq wesdeig Sulssaz01d Jas Byep poduanbas-A1j Usd 104 


-Bulssav0d4g OLID0W IT Nd 


(°,,3UISSIIOIg SSIIDY [VAIIJUJ-[O1}UO-),, OSTe 39S) 





| dd weiserq | ((OFS)=GO.LdO 1d¥) Sisanbas jerjuanbes 104 
| Od wesseiq | (CAI) =GDLdO 1d¥) sisanbas yoaup 105 
/BUISSaIOLY OLIDW LTD 
oe eal cin 





jsonbay Aq 8ulssad01g JUIWIASEULEP-PJOIZY WYSA 





GST) 1duy 


_ Sulssad01g ysanbay JO UONSZTEIUy] UOWIWIO 


(s) 1d 
\ 
98830} JENIA 5.1957) \ 2383035 JENIN A 8,298() 
N 


LOAUGNA 10 WOAHD ®& Isanbas ay} sy] “| © 19931394 


OL OP LL? 3 





(7d 
WeIdeIG UO panuljJUuO.)) “‘Bulssad0i1d Jsonbai ajeljluy ° 





(S)H Td 
“SOTJSLIIJIVIVYS S.jas eyep 
34} YIM JUaISISUOD SI Jsanbol ay} Jey} oinsug * 





ANAANNANNANAAANAN 





JIA eee 8U11}S-jSanbal sy} 0} Japjoysoejd & uBISSY “¢ 





CPATPEBRBRR DED E REP eMA SUi1}S-jsanbsl sy} Ul (S)\Jqdy 9Y) azyenluy * 








© Copyright IBM Corp. 1974,1985 


LY26~-3907-1 


MVS/XA VSAM Logic 


70 


C 


C 


Restricted Materials of IBM 
Licensed Materials — Property of IBM 


Notes for Diagram BB1l 


2 Several RPLs may be chained together 
to process more than one record with 
@ single macro request. For 
example, a GET request associated 
with a chain of three RPLs returns 
three records to the user's problem 
program. 


3 The number of placeholders is based 
on the STRNO parameter in the ACB 
control block. 


Each placeholder is examined to 
determine whether it is available 
for assignment to the request 
string. (Note: OQnce a placeholder 
is assigned to a request string, 
this association is fixed until an 
ENDREQ macro or a direct request 
that doesn't require placeholder 
retention is issued against the RPL 
at the head of the request string. 
After the ENDREQ or direct 
processing is completed, the 
placeholder is available for 
reassignment to another 
request-—string. ) 


When no placeholder is available in 
the list of placeholders for 
assignment to a request or request 
string and resources are being 
shared in a VSAM resource pool or a 
previously empty data set is being 
loaded, an error code is set anda 
raturn is made to the caller. 
Otherwise, IDA019R1 calls IDA019RU 
CIDAXGLPH) to obtain additional 
placeholders. If a placeholder is 
available, its identifier is placed 
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in the RPL associated with the 
user's macro request. 


If any of the following rastrictions 
are violated, an error code is sat 
in the associated RPL and the 
remaining RPLs Cif any) in the 
request string are posted as 
incomplete: 


Keyed Request Errors 


Keyed raquests against an 
entry~sequenced data set are not 
allowed. 


Requests based on a generic key must 
Gee a specified key-length 
value. 


Specified key lengths may not exceed 
the maximum key length value defined 
for a data seat. 


Addressed Request Errors 


An addressed PUT-~add request against 
a key~sequenced data set is not 
allowed. 


An ERASE request against an 
entry-sequenced data set is not 
allowed. 


An addressed request against a 
relative record data set is not 
allowed. 


Control Interval Request Errors 
Control interval requests may not be 
issued against a data set unless the 


data set was opened for control 
interval processing. 
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G -_ VS EC GE OVE 


( VSAM Record-Management Processing by Request 
Type (continued) 


ENDREQ Macro Processing: 
for request processing related to an old data set Diagram BK 1 


for request processing related to a newly created 
data set Diagram BK2 


CHECK Macro Processing: Diagram BL 
VERIFY Processing: Diagram BM 


Control-Interval Access Processing: 


for retrieving control intervals Diagram BN 1 
for creating a data set Diagram BN2 
for updating control intervals Diagram BN3 
MRKBFR Macro Processing: Diagram BP 1 
WRTBFR Macro Processing: Diagram BP2 
SCHBFR Macro Processing: Diagram BP3 
TERMRPL Macro Processing: Diagram BW 
CNVTAD Macro Processing: Diagram BX2 | 
C MNTACQ Macro Processing: Diagram BX3 


ACQRANGE Macro Processing: 


Path Processing: 


Diagram BX1 





for processing a request to gain access to a 
base cluster through an alternate index 





Diagram BQ 


Upgrade Processing: 


for upgrading a changed base cluster’s alternate 
index(es) Diagram BR 


Buffer Management: Diagram BS 
End-of-Volume Processing: 

for obtaining the next volume Diagram BT]! 
Diagram BT2 
Diagram BU1 
Diagram BU2 


for allocating additional space 






ISAM-Interface Request Translation for QISAM 
ISAM-Interface Request Translation for BISAM 


6) 


C 
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Notes for Diagram BB3 


10 When two request-strings are 
competing concurrently for a 
serially reusable resource, the 
second string is deferred. 


When the deferred request is 
synchronous, a WAIT macro will have 
been issued against its ECB. When 
the DIWA is released by another 
request string, control is returned 
to a synchronous request at the 
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point at which it issued the WAIT by 
module IDA019SE. 


It posts the request-string's ECB to 
eliminate the wait condition. 


If an asynchronous request is 
deferred, a return address will have 
been placed in its placeholder, and 
when the serially reusable resource 
becomes available, a branch is made 
to that address. 
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DIAGRAM BC. GET-DIRECT PROCESSING: DIRECT RETRIEVAL 












Jayjng 
jO ssaippy 


WLM 


BoIW pJOI2y IOS 


ejeq 








28810} JENjIIA S.I9S/) 


[BAJ3j Uy [OIJUOD 





b1eq JO VEU 
7M YOM Y 193SH89y 


) 
\ 


ANAARANAAALAN NAAN 














BIW pl0oddy S,19SF) 





BaIY 198f)} 


‘IoJjnq oy} aseajal ‘sanbal }xou a} 
Aq papsou JOU alB IajjJnq 34} JO $}U9}UOD JY} UDA * 


OX 


"BOIR P1OOSI palyloads-1asn sy} OUI Wey JO Aay 
poljloads-asn 34} YJIM payeloosse plOda1 ay} BAO ° 


(9) QE “e218 5,195 


3} O} P1OI9I 94} JO SJUSWIBas [Je VAOP “¢€ 


sak ON 
4, Pp41ooo1 pouueds B pIODOI OYJ S] °Z 


(aoe ON ® 





juswNngiy 
yo1eaS} 


6 “Ia[JVo O} UIN}9y DAG 
© 


IBEIOJS JENA S1IS() 





‘lajjnq eyep e Ul [eAro}UT a 
JO1}UO5 34} DORTd puke YE_Y Jo Ady poljloads-iosn 39S 
34] TULUTEJUODS [BAIOJUI [OIZUOD BJeP ay} 9}LIO7T ‘Tf eed 
WVSA 
} xapu] 
WVSA 


© Copyright IBM Corp. 1974,1985 


LY26-3907-1 


76 MVS/XA VSAM Logic 


Restricted Materials of IBM 
Licensed Materials — Property of IBM 


Notes for Diagram BC 
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meved Processing~—Key-Sequenced Data 
Se 


IDAO1ORA 


When the request is keyed, an index 
search must be performed. The index 
level at which the search begins is 
based on the following 
considerations: 


e For skip~sequential processing, 
the index search starts at the 
sequence set=~normally at the 
index record pointed to by the 
current PLH. If the PLH is 
invalid, the search starts at 
the first record in the sequence 
set. 


e For direct processing, the 
search starts at the highest 
level of the index. 


IDAO1ORA calls IDAOLORB, which 
calls IDAOI19RZ CIDAGRB) 


The index record at which the search 
is to start is moved into an index 
buffer. 


IDAOLORB calls IDAOI9RC 


The index record is searched for an 
entry that is greater than or equal 
to the search key. 


IDAOLORB 


When the search is unsuccessful, the 
next record in logical sequence is 
searched. If the search is 
successful and a lower index level 
exists, the search is performed on 
the index records in the lower 
level. 


Keyed Processing-~Relative Record 
Data Set 


IDAOLORR 


The relative record number specified 
as a search argument is converted 
into the RBA of the control interval 
that contains the record, plus the 
offset of the record in the control 
interval. 


IDAOLORR calls IDAOIORZ CIDAGRB) 


The control interval is read in by 
the RBA. 


Addressed Processing 
IDAOLORA 


The RBA specified as a search 
argument is converted into the RBA 


of the boundary of the control 
interval within which it falls. 


IDAO19R4 calls IDA019S6 


IDA019S6 is called if the CIDFBUSY 
bit has been detected in the CIDF 
indicating a CI split was 
interrupted or is still in progress 
for the CI. IDA019S56 will set a 
return code and reason code in the 
RPL if the CI cannot be repaired. 


This step doesn't apply to a 
relative record data set. 


IDAOIORG calls IDAOIORT (IDADARTV) 
A spanned record is retrieved. 
IDADARTV calls IDAOQ1LORZ (IDAFREEB ) 


A segment is moved to the user's 
area. The buffer is freed. 


IDADARTV calls IDAOI9ORZ (CIDAGNXT) 
The next segment is obtained. 
IDAO19ORS 


If the user is performing locate 
processing, the address of the 
record is moved into the user area. 


If the request is for update and an 
upgrade set exists, IDAQI9RU is 
called to save the LLOR (least 
length of the record that contains 
all key fields). (See Diagram BR.) 


IDAO19RG calls IDAO019S6 


IDA019S6 is called if the CIDFBUSY 
bit has been detected in the CIDF 
indicating a CI split was 
interrupted or is still in progress 
for the CI. IDA019S6 will set a 
return code and reason code in the 
RPL if the CI cannot be repaired. 


Relative Record Processing 
IDAOLORR 


If the user is performing locate 
processing, the address of the 
record is moved into the user's 
area. 


IDAO1LORG: RLSEBUFS (calls IDAO19RZ) 


If the request is direct and neither 
update, note-string-~position, nor 
locate mode is specified, the 
contents of the buffer are not 
logically needed by the next request 
and the buffer is released. If thea 
user is processing with shared 
resources, any index buffer is 
freed. 


Relative Record Processing 
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IDAOIORR calls IDAOI1ORZ C(CIDAFREEB ) update, note-string-position, nor 
locate mode is specified, the buffer 
If the request is direct and neither is released. J 


J 
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Notes for Diagram BD 
Ray eenueniced or Entry-Sequenced Data 
e 


1 IDAN1ORG 
2 Forward Processing 
IDAO019R4: ADVPLH 


IDAADVPH calls IDAO19RZ CIDAFREEB) 


The current control interval is 
released. 


IDAADVPH calls IDAO19ORZ CIDAGNXT ) 


The preceding control interval is 
retrieved. 


4 IDAO19R4¢ calls IDAG1LORT CIDADARTV) 
Normal GET-~sequential processing 
advances the record pointer to the A spanned record is retrieved. 
next record in physical sequence in 
the data buffer. IDADARTV calls IDAQI9RZ (IDAFREEB) 
If the advance positions the record A segment is moved to the user's 
pointer to the end of a control area. The buffer is freed. 
interval, the following processing 
is performed: IDADARTV calls IDAOQL1ORZ CIDAGNXT) 
IDAOQ19RG calls IDAO19ORZ CIDAFREEB ) The next segment jis obtained. 
The current buffer is released. § IDAO19OR4: DATARTV 
IDAO1ORG calls IDAGLORZ (CIDAGNXT ) If the request is for update and an 
upgrade set exists, IDAOLORU is 
The next control interval is called to save the LLOR (least 
retrieved. If the next control length of the record that contains 
interval contains all free space, all key fields). (See Diagram BR.) 
the retrieval process continues 
until a control interval containing Relative Record Data Set 
data is acquired. 
1 IDAOLORR 
IDAO19ORG calls IDA01986 
The data buffer contains the current 
IDA019S6 is called if the CIDFBUSY control interval. 
bit has bean datected in the CIDF 
indicating a CI split was IDAOLORR: ADVPLH 
interrupted or is still in progress 
for this CI. IDA019S6 will set a The record pointer is advanced for 
return code and reason code in the normal sequential processing or 
RPL if the CI cannot be repaired. backed up for backward sequential 
processing. If the record pointer 
Backward Processing points to the end of the control 
interval for normal processing or 
IDAO19R4 calls IDAGQI9ORV (IDAADVPH) the beginning of the control 
interval for backward processing, 
Normal processing advances the the following processing takes 
racord pointer to the preceding place: 
racord in RBA sequence in the data 
buffer. IDAOQLORR calls YDAOLORZ (IDAFREEB) 
IDAOI9R4 calls IDA01986 The current buffer is released. 
IDA019S6 is called if the CIDFBUSY IDAOLORR calls IDAOLORZ CIDAGNXT) 
bit has been detected in the CIDF 
indicating a CI split was For normal processing, the next 
interrupted or is still in progress sequential control interval is 
for this CI. IDA019S6 will set a retrieved, and the record pointer is 
return coda and reason code in the sat to the first record. For 
RPL if the CI cannot be repaired. backward processing, the preceding 
sequential control interval is 
If the record pointer points to the retrieved, and the record pointer is 
beginning of a control interval, the set to the last record. 
following processing takes place? 
5 IDAO1LORR 
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Notes for Diagram BE 
1 Create Mode Processing 


IDAQDLOR4: SQICHECK (calls IDAOLORZ 
CIDAGNNFL )) 


When processing 18 in create mode 
and the current request is the first 
request after opening the data set, 
a buffer is assigned to the request. 


IDAOLOR4: SQICHECK 


The buffer is initialized and buffer 
output 16 positioned to the first 
control interval associated with the 
data set. 


Add-to-End or Mass Insert 
(Noncreate) Processing 


IDAO19ORG: GETINCI (calls IDAO19SRA) 


The address of the desired control 
interval is established by GETINCI, 
and IDA019RA determines whether the 
control interval in the current data 
buffer has that address. When it 
does not, excess buffers are 
released CIDAODILSYRA calls IDAOI1IRZ 
CIDASBF)) and the desired control 
interval is moved into the buffer 
CIDAQIORA calls IDAOD19YRZ CIDAGRB)). 


IDAOQ1LOR4 calls IDAO1ORU 

4 IDAO19RM calls IDAOL1ORT 
If the buffer is not empty, IDA019RT 
calls IDA019SA to obtain an empty 
buffer. 

5 IDAOQLORT 


The record segment is moved to the 
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buffer, and the CIDF and RDFs are 
built. 


IDAODLORG calls IDAO19RM 


When there is insufficient space to 
contain the new record, IDA019RM 
calls IDAO19SA and the following 
processing 1s performed: 


IDAQLOSA calls IDAOIORZ (IDAFREEB ) 


The current data buffer is released 
to be written. 


IDAOI1OSA: EOCA 


When no more control intervals in 
the current control area can be 
used, IDA0D19SA calls IDAO019RZ 
CIDAWRBFR) to ensure that all output 
to the current control area is 
completed. Then, after positioning 
to the next control area boundary, a 
test is made to determine whether 
the new control area address exceeds 
the limits of the data space 
allocated to the data set. If the 
data space is exceeded, IDAO19ISA 
CEOCA) calls IDA019SE CIDAEOVIF) to 
issue an SVC 55 in order to allocate 
additional extents to the data set. 


IDAOLORM 


Before moving the record into the 
control interval, an RDF is created 
for the new record. 


Actually, this process occurs at 
step 6. It is not determined that a 
control interval is full until an 
attempt is made to insert the next 
new record. 
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Notes for Diagram BF 3 IDAOIORM calls IDAOLORT, which 
calls IDAOI9SA 
| l IDAO1OR4S calls IDAO19RZ (CIDAGNNFL ) 
| IDAODLISA gets an empty buffer. 
The buffer control block entries are IDAOLORT moves a segment to the 
searched for an unassigned entry. ampty buffer. 
The first unassigned entry found is 
assigned to the current request. 4 IDAO19ORS calls IDAO19RM 


C 
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CREATING A KEY-SEQUENCED DATA SET 


DIAGRAM BGl. 
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Notes for Diagram BGl 
l IDAO19SSA calls IDAO19RG 
2 IDAQIOSA calls IDAOI9ORZ (CIDAFREEB ) 


The buffer is made available for 
assignmant to another request; 
however, the next request that 
attempts to use the buffer must 
ide write the contents to the data 
8@ a 


3 IDAOLOSA calls IDAOLORZ (CIDAGNNFL) 


The BUFC for the next available 
buffer must be written before it can 
be used. If tha buffer must be 
written, buffer management calls the 
I/O manager, IDAM19R3, to perform 
the write operation, and a wait is 
performed to ensure that the I/0 is 
completed. (Note: The IDAGNNFL 
procedure is called when processing 
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in create mode or when adding to the 
end of an entry“sequenced data set 
in update mode. Write operations 
for PUT~sequential processing are 
initiated only by IDAGNNFL.) 


IDAOL9OSA 
IDAOIOSA!: EOCA 


More control intervals cannot be 
added to the current control area if 
the key of the last record in the 
last data control interval equals 
the high key of the current or only 
key range or if there aren't enough 
freespace control intervals 
remaining in the control area to 
hold the new record and to maintain 
freespace requirements (that is, te 
maintain the number of freespace 
control intervals per control area 
spacified by the user). 
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Notes for Diagram BG2 8 IDAOIOSA calls IDAOLORK 
( 6 IDAQLOSA: EOCA (calls IDAOI1ORZ 9 IDAOLOSA 
(CIDAWRBFR ) ) 
IDAO19OSA calls IDAOLORS (CIDAEOVIF ) 
Other than the current data buffer, 
all the data buffers that have not The end-of-volume processor is 
been previously written are written called to allocate additional 
to the current control area. extant(s) to the data set if 


necessary. 


10 IDAO19SA calls IDAOLORK 


7 IDAOIOSA calls IDAOI19RG 
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Notes for Diagram BG3 


C 11 


12 
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IDAOLORG calls IDAOLORN CIDAAQR) 


The index address-range-definition 
block CARDB), which governs the 
range of keys that include the new 
index entry's key, is located. The 
field in the ARDB that contains the 
address of the next available 
freespace control interval is placed 
in the index create work area 
CICWA). 


IDAOLORG calls IDAO19RZ CIDAGNFL ) 


An index buffer is assigned to the 
request... 
IDAOLORG: INTNENRC 

The contents of the index buffer are 
set to 0 and the following items in 
the buffer are initialized to form 
an index record: header, dummy 
entry, CIDF, RDF, and freespace data 
control interval pointers Cif the 
request is for a sequence-set 
record). 
IDAOQLORG: IDAIST 

Before the new entry's key is 
compressed, the current, previous, 
and section key values in the ICWA 
are updated; the current key becomes 
the previous key, the new key 
becomes the current key, and the 
section key is updated if a new 
section entry has been built. 


The new key is compared with the 
previous section key, and a count of 
the common leading characters in thea 
keys is set as a front compression 
value. (Note: The new key is 
front-compressed as if it were for a 
section entry even though it may not 
be. Because they front-compress 
less, section entries are slightly 
larger than normal entries. ) 


When the current index record is a 
sequence-set index record, the 
current key is rear-~compressed 
relative to tha next data-record 
key, that is, the key of the first 
data record in the next data control 
interval. The next data-record key 
is in the record located by the 
RPLAREA field. 


The characters in the keys are 
compared from left to right until 2 
corresponding characters in the 
respective keys differ in value. 

The current key is then truncated at 
this point. 
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The length of the new entry is 
established, based on the compressed 
key and section pointer, F, L> and 
normal pointer field lengths. When 
there is an inadequate amount of 
unused space in the current index 
record to contain the new entry, a 
return is made to the caller, 
IDAO019SA, to obtain a new control 
area. (Note: IDA019SA recalls 
IDAO19RG to write the current index 
record and to create an entry for 
the newly completed index record in 
a higher-level index record.) 
Section Entry Processing 

IDAO19ORG: IDAIST 

Move the F, L, and key values into 
the dummy entry, which becomes the 
new section entry. Then set the 
offset to the new dummy's F field in 
the new section entry's LL field. 
(Note: The offset in the LL field is 
incremented by the displacement to 
each succeeding new dummy entry's F 
field until a new section entry is 
established. The process then 
repeats for each succeeding section 
entry until the record is filled.) 


When a previous section entry 
exists, it is linked to the new 
section entry by setting the 
displacement between the F fields of 
the new and previous section entries 
in hits previous section entry's LL 
field. 


When the insertion is to a 
sequence~set record or when an 
index-record split was just 
performed on the index record to 
receive the new entry, the next 
freespace control interval pointer 
in the index record is moved into 
the dummy record. (Note: During 
create processing, a dummy record is 
always maintained as the highest 
possible key in the index in order 
to make the index complete and 
searchable even while it is being 
created.) 


When the new section entry is made 
in a high~level index record, the 
RBA of the current index record in 
the next lower index level is 
converted to an index entry pointer 
and placed in the dummy entry. 
(Note: There is an ICWA for each 
level of the index. Each ICWA has a 
field containing the RBA of the 
current index record at its 
particular index level.) When the 
current index record in the next 
lower level is completed, its high 
key will be placed in the dummy 
entry and this cycle continues. 
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Normal (or Nonsection) Entry 
Processing 


IDAOLORG: IDAIST 


The current key is front-compressed 
relative to the previous key. The 
front compression performed in step 
12 is based on the assumption that 
the new entry is a section entry. 
Only the rear compression performed 
for step 12 is valid in this normal, 
or nonsection, entry case. 


The key length is calculated and the 
F, L» and key values are moved into 
the new entry. 
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When a section entry has not been 
built, the section entry pointer in 
the index record header is advanced 
to point to the F field in the new 
dummy entry. 


When a section entry has been built, 
the LL field is incremented by the 
displacement between the new entry's 
F field and the new dummy entry's F 
field (see also Note 13, "Section 
Entry Processing,™). 


For a description of how the dummy 
entry's pointer is derived, see Note 
13, "Section Entry Processing." 
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CREATING A KEY-SEQUENCED 


DIAGRAM BG4. 
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Notes for Diagram BG4 


( 15 IDAOQ1ORG 
The base RBA is the RBA of the data 


control area controlled by the index 
record. During index create, the 
dummy entry points to the freespace 
control interval following the last 
control interval in the control area 
into which data records were 
inserted. At the end of 
index-create processing, the dummy 
points to the control interval 
containing the high-key record of 
the data set. 


16 IDAOLSRG calls IDAOI1ORJ CIDAWR) 


This operation overlays the index 
record that was generated by step 21 
when this procedure was previously 
entered. 


17 IDAOIORG calls IDAOLORN (CIDAAQR) 


The index address range definition 
block CARDB) that governs the range 
of keys that includes the new index 
entry's key is located. The 
contents of the field in the ARDB 
that contains the address of the 
next available freespace control 
interval is placed in the ICWA. 


18 IDAO19ORG: INTNENRC (calls IDAOIORZ 


¢ (IDAGNFL )) 


An index buffer is obtained, the 
buffer is cleared, and it is then 
initialized as a sequenced-set or a 
high-level index record. 


When the index record is high level 
(see Note 19), a pointer to the 
lower-level index record just 
written Csee Note 21) is moved into 
the new higher~level index record as 
the dummy entry representing the 
highest key of the current level of 
the index. 


19 Steps 17 through 27 represent a 
repeating sequence of operations 
that retain control until an index 
entry is successfully inserted into 


Cc 
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an index record on the index level 
above the level on which a new index 
record is created. The first time 
through this code, processing is 
directed at tha sequence-set level 
of tha index. Subsequent iterations 
are directed at successively higher 
levels of the index. 


IDAOIORG: IDAIST 


The high key of the new lower-level 
index record is moved into the new 
higher-level index record built by 
step 18. 


Dummy entries are maintained in all 
levels of the index as the highest 
possible key in each level in order 
to ensure that the index is 
complete, or searchable, even when 
it is being created. If the index 
is accessed while it is being 
created, an index search, no matter 
how high the key of the search 
argument, is always satisfied. 


For high-level index records (see 
Note 18), the dummy entry points to 
the incomplete index record at the 
next lower level, and, for 
sequence-set records, it points to a 
data control interval. 


IDAOIORJ: IDAWR 


The new sequence~set or high-level 
unex record 18 written to the data 
set. 


On a sequence-set level, this record 
points back to the data control 
interval in the control area 
belonging to the previous (just 
completed) sequence-set record and 
is maintained only to make the index 
complete. It is destroyed when the 
next sequence-set index record is 
completed and written to the data 
set (see Note 16). 


On a higher level, this new record 
has an entry for the index record 
just completed on the next lower 
level and a dummy entry for the new 
incomplete record at that level. 
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Notes for Diagram BG5 
22 IDAOI9RJ: IDAR 


The previous index record at the 
current index level is reread. 


IDAOLORG 


A horizontal pointer to the new 
record on the current index level is 
set in the previous index record. 


IDAOLORG calls IDAQO1ORN CIDAER) 


The dumny entry in the index record 
is erased, and the last Chigh~key) 
entry, or antry preceding the erased 
dummy entry, is converted to a 
section entry. The dummy entry is 
removed without detracting from the 
completeness of the index, becausa & 
new dummy entry has been created by 
steps 20 and 22 (for high-level and 
sequence-set records, raspectively) 
and because the horizontal pointer 
in the previous record makes the 
dummy entry accessible. 


23 IDAOQISRJ: IDAWR 

24 IDAOISRG calls IDAO1ORN (CIDAAQR) 
The index address range definition 
block CARDB) that governs the range 
of keys that includes the new index 
entry's key is located. An ARDB 
field contains information about the 
next available freespace control 
interval; it is placed in the ICWA. 
IDAO19SRG: INTNEWRC 


The buffer is initialized as a 
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26 


27 


high-level index record. A pointer 
to the lower-level index record just 
completed (see Note 19 or 22) is 
moved into the new higher-level 
index record as the dummy entry 
representing the highest kay of the 
current level of the index. 


IDAO1LORJ: IDAR 
IDAOLORG 


The current key in the ICWA for the 
current index level is moved into 
the current-key field in the next 
higher level's ICWA. 


IDAOLORG: IDAIST 


The value in the higher-level's ICWA 
is inserted in the current 
higher-level record. 


IDAOLORZ: IDAFREEB 


When a new entry will not fit in the 
higher-level record, a new 
higher-level record is built to 
contain the new entry. 


The processing of steps 17 through 
27 is repeated until an index entry 
is successfully inserted into an 
index record on the index level 
above the level on which a new index 
record is created. 


When this sequence~set record is 
completed and this routine is 
reentered, this record will be 
written at step 16, overlaying the 
dummy sequence~set record written at 
step 23. 
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Notes for Diagram BH1 
1 IDAO1ORA 


An index search must be performed. 
The index level at which the search 
begins is based on the following 
considerations: 


e For skip-sequential processing, 
the index search starts at the 
sequence set. The search 
normally starts at the index 
record pointed to by the current 
PLH. If the PLH is itnvalid, the 
search starts at the first 
record in the sequence set. 


e For direct processing, the 
search starts at the highest 
level of the index. 


IDAOLORA calls IDAOLORB, which 
calls IDAO1ORZ (CIDAGRB ) 


The index record at which the search 
is to start is moved into an index 
buffer. 

IDAQLORE calls IDAO1ORC 

The index record is searched for an 
entry that is greater than or equal 
to the search key. 

IDAOLORE 


When the search is unsuccessful, tha 
next record in logical sequence is 


LY¥Y26-3907-1 © Copyright IBM Corp. 1974,1985 


co oOo we 


searched. If the search is 
successful and a lower index level 
exists, the search is performed on 
the index records in the lower 
level. 

IDAO1ORU 

If an upgrade set exists, upgrade 
the alternate indexes in it. (See 
Diagram BR.) 

IDAO1LORA calls IDAOLORZ CIDAGRB) 
IDAQ1ORM calls IDAO19ORT 

For spanned-record processing. 
IDAOLORT calls IDAOISRE 

IDAQIORE is called until the current 
buffer, whose address is given in 
PLHDBUFC, is empty. 

IDAOQLORT calls IDAOLORE 

The control area is split too, when 
the sequence-set record won't hold 
enough entries for the 
spanned-record insertion. 

IDAOLORT calls IDAO1ORC 

IDAOLORT calls IDAOLORS CIDAMVSEG) 
IDAO1ORT calls IDAOLORS (CIDAADSEG } 


IDAQ1ORG calls IDAO1ORM 
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Notes for Diagram BH2 
12 IDAOQI19ORL 
13 IDAOLORL calls IDAO1ORS 


IDAO19RS gets control only when the 
old record is a spanned record. 


14 IDAOQLORS calls IDAO19RC 

15 IDAOILORS: IDAMVSEG 
A CIDF and RDFs are built for each 
control interval that contains a 
segment. 

17 See note for step 15. 

18 IDAG19RS: CLEARSEG 
An unused buffer is gotten and 
filled with binary zeros and a 
freaspace CIDF. It is written for 
each freed segment. 
IDAO19RS: DELSEG 


Entries for unused segments are 
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20 


21 


removed, and 
free-data-control-interval pointers 
are set up. 


IDAOLORS calls IDAOLORF 
See note for step 15. 
IDAO19RS: IDAADSEG 


Entries for the additional segments 
are set up in the sequence set. 


IDAOLORL 


The old Cunspanned) record is erased 
by overlaying it with records to its 
right. If the record is the last 
record in the control interval, it 
is cleared with zeros. IDAO19RL 
then calls IDAO19RM to insert the 
new Cunspanned) record. 


IDAO19RM 
If an upgrade set exists, the 


alternate indexes in it are 
upgraded. (See Diagram BR.) 
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Notes for Diagram BH3 
24 IDAOLORE calls IDAO1ORZ CIDAGRB) 


When the current sequence-set index 
record has been updated by another 
request since it was last read, it 
must be reread. 


IDAO1ORE calls IDAOLORZ (CIDAFREEB) 


When the current data control 
interval has been updated by another 
request since it was last written, 
it must be rewritten to preserve 
those updates from possible loss. 


25 


If the record is to be inserted at 
the end of a control interval or if 
it is one of a sequence of records 
to be inserted at the beginning of a 
control interval, the control 
interval is not split and the record 
is placed in the next control 
interval currently containing 
freespace. 


If the request is a direct request 
to insert a record at the beginning 
of the control interval or if it is 
either a direct or sequential 
request to insert a record at some 
point other than the beginning or 
end of the control interval, the 
control interval must be split. 


If the request is a sequential 
request, the control interval is 
split at the point at which the data 
record is to be inserted. 


If the request is a direct request, 
the record boundary nearest to the 
midpoint of the control interval is 
used as the split point. 


The RDFs are divided among the 
control intervals so that they 
remain associated with their 
respective records. 


IDAOIORE calls IDAO19RZ 
CIDAGNFL) and IDAO19RE (BUILDFS) 


A work buffer is obtained, converted 
to freespace, and attached to the 
data insert work area (DIWA). The 
work buffer is used to perform the 
record insertion processing. 
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28 


29 


30 


IDAO LORE 


Records to the right of the split 
point in the old control interval 
are moved into the new freespace 
control interval. Then the moved 
records are zeroed-out in the old 
control interval, and the freespace 
pointers in each control interval's 
CIDF are adjusted. 


IDAOISRE calls IDAOI19RF 
IDAOLORE calls IDAOLORM 
IDAO1LORE calls IDAO19RH 


The new index entry reflects the 
high key of the data records within 
the new data control interval. If 
the new index entry fits in the 
index record, the buffer that 
contains the record is not written 
to the index until the new data 
control interval is written to the 
data set. 


IDAO1ORE calls IDAOI9RZ CIDAWRBFR) 


When a control interval occurs, the 
old data control interval is written 
with the CIDBUSY bit off. 


IDAOLORE calls IDAO19RZ CIDANREFR ) 


The new data control interval 
residing in the work buffer 
associated with the DIWA is written. 


IDAQIORE calls IDAO1ORH (CIXIDANWR) 


The updated index record residing in 
the index buffer associated with the 
current placeholder is written. 


IDAOI9RE calls IDAO1ORZ CIDAWREFR) 


When a control interval split occurs 
(see Note 25), the old data control 
interval associated with the current 
placeholder is written with the 
CIDFBUSY bit off. 


If the record insertion is 
unsuccessful after the control 
interval has been split, a second 
pass results ina successful 
insertion-~—-IDA0D19R4 has verified 
that the record fits in a control 
interval. 
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Notes for Diagram BH4 


When the process involves adding a 
record to the end of a key range or to 


the end of the data set, 


there is no 


data transfer between control areas. 
Steps 37 through 41 and 42 are the only 
steps performed for add-to-end and 
end-of-key-range processing. 


31 


32 


33 
34 
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IDAOLORF 


The number of control intervals to 
be moved to the new control area 
from the control area being split is 
calculated: 


e If the request is a sequential 
insert request CRPLSEQ=O0N), all 
data control intervals to the 
right of the insert point are 
moved to the new control area. 


e If the request is a direct 
request, one half of the data 
control intervals are moved to 37 
the new control area. 


IDAOLORF calls IDAOI9RW (CIDAABF ) 


Buffers are added to the 
placeholder's buffer chain until 
there is a buffer in the chain for 
each control interval to be moved or 
until there are no more data buffers 
in the buffer pool. 


The control area can't be split if 
it contains only one (spanned) 
record Ceach control interval 
contains a segment). 


IDAOIORF calls IDAOLORK 


IDAOQLORF calls IDAO19SF, which 
calls IDAOI9ORI CIDANEWRD) 


The header of the index record is 
initialized. 


User's Key Less Than Old Key 38 


The new sequence~set record is 
pointed horizontally to the 
sequence-set record of the old 
control area. The sequence-set 
record preceding the old control 
area's sequence-set record is 
located. 


IDAOLSSF calls IDAO19RZ (CIDAGRB) 

The preceding sequence-set record is 
read and pointed horizontally to the 
new sequence-set record. 

IDAOIOSF calls IDAOLORZ (CIDAWRBFR) 


The preceding sequence-set record is 
written. 


User's Key Greater Than Old Key 
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IDAOLOSF calls IDAO1ORZ CIDAWRBFR) 


The new sequence-set record is 
pointed horizontally to the 
sequence-set record that the 
sequence-set record of the old 
control area pointed to and is 
written. 


IDAOLOSF calls IDAO1ORZ CIDAGRB ) 


The sequence-set record of the old 
control area is read and pointed 
horizontally to the new sequence-set 
record. 

IDAO1LOSF calls IDAO19RZ CIDAWRBFR) 


The sequence~set record of the old 


control area is written. 
IDAOQ1OSF calls IDAOISORI 
IDAO19SF calls IDAOI19RZ 
IDAO1ORF 


(IDAHLINS ) 
CIDAGNNFL } 


Before acquiring a freespace control 
area, the data buffer control block 
(BUFC) chain is examined to 
determine whether any have an RBA 
under exclusive control within the 
range of RBAs for the control area 
being split. If there is an 
exclusive control conflict, an error 
code is set and a return is made to 
the caller. 


If the boundary of the next 
freespace control area exceeds the 
boundary of the current extent, that 
is, the high-allocated RBA, VSAM End 
of Volume its called via an SVC 55 to 
attempt to acquire more space (see 
Diagram BT1, "VSAM End of Volume: 
Obtain the VSAM Object's Next 
Volume"). If space is unavailable, 
an error code is set in the RPL and 
a return is made to the caller. 


IDAOLORF calls IDAO19ORZ CIDAGRB) 


The first control interval is 
retrieved as a direct request. 


IDAOLORF calls IDAOLORZ CIDAGNXT) 


Subsequent control intervals area 
retrieved on a sequential basis. 


IDAOLORF calls IDAOI9RZ CIDAFREEB ) 


As each buffer is filled, its 
must-write flag is set (BUFCMW=O0N), 
and it is than released 
(BUFCAVL=ON). 


IDAOQIORF calls IDAOLORZ CIDAWRBFR ) 


When all the control intervals 
eligible for the move have been read 
into buffers, the buffers are 
written to the data set. 
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IDAOLORF calls IDAO19RK 


IDAOLORF calls IDAOI1ORI, which 
calls IDAOLORJ 


For add-to-end processing, only a 
new sequence-set record is created. 


MVS/XA VSAM Logic 





Restricted Materials of IBM 
Licensed Materials ~ Property of IBM 


For other processing, the original 
control area's sequence-set record 
is split, thereby creating a new 
sequence-set record with index 
entries for the control intervals 
that were moved to the new control 
area. 
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KEY-SEQUENCED DATA SET 


MODIFYING 


DIAGRAM _BHS5. 
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Notes for Diagram BHS 


41 
42 
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IDAOLORI 


Any control intervals that were 
copied into the new control area and 
that are no longer validly 
associated with that control area as 
a result of distribution changes 
effected by the sequence-set split 
process are zeroed out in the new 
control area. The following 
procedures effact this change: 


All the buffers in the placeholder's 
buffer chain are zeroed out. 


IDAOLORF calls IDAO19RZ CIDAGNNFL ) 


A buffer in the placeholder's buffer 
chain jis assigned as a work buffer. 


IDAGIORF calls IDAO19RZ CIDAFREEB ) 


The work buffer's must-write flag is 
set on, and it is freed. (Note: It 
is written when the next request for 
a free buffer examines its 
must-write status and causes it to 
be written before reassigning it.) 


IDAOLORF calls IDAOLORZ CIDAWREFR ) 


The previous two steps are repeated 
until all invalid control intervals 
in the new control area have been 
erased. All the work buffers are 
then written to the data set. 


IDAOLORF calls IDAO19RZ CIDAGRB) 
The sequence set of the original 
control area is then read into an 
index buffer. 


If the control interval containing 
the insert-point address is returned 
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43 
44 


to the old control area by the 
process outlined by the previous 
four steps, the insert point must be 


recalculated. 


IDAOLORF calls IDAO1ORZ CIDAWRBFR) 


os buffers are written to the data 
set. 


IDAO1ORF 
IDAO1ORF 


Ensure that the PLH points to the 
sequence-set record containing an 
index entry for the data control 
interval that contains the new 
record's insert point. 


IDAOLORZ (CIDAFREEB ) 


If it does not, the index buffer 
containing the sequence-set record 
for the old control area is 
released. 
IDAO19ORZ: IDAGRB 

The sequence-set record for the new 
control area is brought into the 
index buffer. 


IDAOLORZ: IDASBF 


The buffers that were added to the 
placeholder's buffer chain to 
support the control~area-split 
process (see Note 31) are released 
from the chain. 


IDAO1ORZ: IDAGRE 


The control interval that contains 
the insert point is retrieved from 
the data set and placed in a data 
buffer. 
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Notes for Diagram BH6 


65 IDAOLORH 
46 IDAOLORH 


47 IDAOISRH calls IDAO1ORC 


The indax-racord search begins with 
a search of the saction entries. 
After a saction antry whose key is 
equal to or greater than the key 
being sought is located, the 
individual entries governed by the 
section entry are examined until a 
key that is graater than the search 
key is found. 


During the nonsection antry search 


process, a count 


of the common 


leading characters of aach entry 


relative 


to the search kay is 


maintained. When control is 
returned te IDAQ19RH Cindax insert), 
this value is sometimes used as tha 
front kay-compression valua of the 
new entry's key, or the search key, 
ralative to tha previous, or 
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48 


49 


lower~keyed, entry in the index 
record, 


Basing the high key of the new 
control interval on the low key 
(minus 1) of the next control 
interval enables the sequential 
insertion process to continue 
without having to update the index 
record for each record in the group 
of records that are added to the 
data control interval as a mass 
insert; otherwise, a relatively 
small group of records could 
establish multiple new high keys for 
the control interval ranniving tha 
records. 


TDAOLORH! COMPRS 


The leading characters of the two 
keys ere compered until the first 
unlike character is found. Tha like 
characters are dropped from the new 
key when it is compressed. 


The front and rear compression 


values are then used to determine 
the length of the compressed key. 
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Notes for Diagram BH7 
50 IDAOLSRH 


For section-entry key compression, 
the new section key is compared 
against each succeeding section 
entry, starting with the first, in 
oe aa the front compression 
value. 


51 IDAOI9RH: HLINSERT 


Before establishing a 
front-compression value, the front 
key compression, or F value, in the 
high-keyed index entry is compared 
against the front-key compression 
value combined with the key length 
of the new index entry. If the F 
value in the high-keyed index entry 
is not greater than the other 
combined values, or if the key 
length, or L value, of the new index 
entry is 0, compression is not 
performed. 


52 IDAOQ19RH 


The length of the new entry's key (¢L 
value) plus the standard F, L; and 
pointer field lengths are compared 
to the amount of freespace in the 
current index record combined with 
the front-compression value 
established by step 51. CIf the 
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54 


entry is a section entry, the length 
of the section entry pointer (LL 
field) is also included in these 
calculations.) If there is 
insufficient space for the new index 
entry, control is returned to 
IDAO1LORJ Cindex split), by way of 
IDAOLSRI Cindex update), to split 
the index record. 


IDAOLORH 


The higher-keyed entry is moved to 
the left, overlaying the front 
characters in its key which are to 
be compressed. 


IDA019RH 


The entries following (to the left 
of) the insert point are moved to 
the left, overlaying the freespace 
to the left of the high~keyed entry 
in the record, until sufficient 
space exists at the insert point to 
contain the new index entry. 


The following higher-keyed index 
entry contains the key of the new 
data or index control interval 
generated by IDAO19RE (control 
interval split) or IDA0O19RJ Cindex 
split). Accordingly, its pointer 
must be replaced with a pointer to 
the new control interval. 
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Notes for Diagram BH8 56 
55 IDAOLORI calls IDAOIORN (IDAAQR) 57 
The index address range definition 58 


block CARDB) that governs the range 
of keys that includes the new index 
entry's key is located. Tha 
contents of the field in the ARDB 
that contains the address of the 
next available freespace control 
interval is placed in the ICWA. 


IDAOLORJ calls IDAOLORK 


If this is the first time that space 
governed by the ARDB located above 
has been used and if 
sequence~set-with-data is specified, 
the new index record requires 
preformatting. Starting at the 
address established above, software 
end-of-file control intervals 
(zeros) are built until the end of 
the track on which replication is to 
occur 78s reached. 


IDAOLORI calls IDAO19RZ (IDAGNEL ) 
A buffer is assigned to the request. 


IDAOLORI calls IDAOL1ORH, which 
calls IDAO19RZ (CIDAWRBFR ) 


The high-level index record is 
written. 59 
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IDAOLORI calls IDAO19RB 
IDAO1ORI calls IDAO19RH 


If there was insufficient space in 
the index buffer to support the 
index-split process, an attempt is 
mada to provide more space. 


IDAGI9RI: FINDSP 


The offset to the section entry 
containing the split point is 
established by tracing along the 
chain of section entries until a 
section entry is reached whose 
displacement from the start of the 
index record is less than the 
displacement of the split point used 
in the prior unsuccessful split 
operation. 


IDAO1ORI: LNEXTE 


Using this information, a new split 
point is established for the next 
attempt to split the index record. 


IDAO1LORI calls IDAOLORJ 

The index record is split to create 
space for the index entry associated 
with the new index record created by 
the split process. 


IDAOLORI calls IDAO19RH 
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Notes for Diagram BH9 
61 IDAOIORN: IDAAQR 


The index address range definition 
block CARDB) that governs the range 
of keys that includes where the new 
index entry's key is located. The 
contents of the field in the ARDB 
that contains the address of the 
next available freespace control 
interval is placed in the ICWA. 


IDAOLORJ calls IDAOLORK 


If this is the first time that space 
governed by the ARDB located above 
has been used and if 
sequence~set-with-data is specified, 
the new index record requires 
preformatting. Starting at the 
address established above, software 
end-of-file control intervals 
(zeros) are built until the end of 
the track on which replication is to 
occur 1S reached. 


62 IDAOLORJ: IDAR (calls IDAO19RZ 
(IDAGRB } ) 


The appropriate index record is in 
the index buffer when IDAOI19YRJ is 
entered. However, the index is 
freed by IDA019RJ to provide for the 
contingency that preformatting of 
succeeding index records will be 
required (see Note 61). 

Accordingly, the index record must 
be reread. 


63 IDAO19RJ: DELSECT 


Starting with the rightmost, or 
low-keyed, section entry, each 
section entry 1s moved to the left 
by the length necessary to eliminate 
the section entry's section-chaining 
pointer (LL field). This operation 
continues until the last section 
entry is reached. The last section 
entry is identified by a section 
chaining pointer containing zeros. 


64 IDAOLORJ 


For sequence-set index records, a 
complete set of Ii-byte or 2-byte 
pointers is built adjacent to the 
index header. The number of 
pointers equals the number of 
control intervals per control area. 


65 IDAO1ORJ: MOVEPTR 


For high-level index records, each 
index pointer in the index block is 
moved into the freespace between the 
index header and the index block, 
moving from left to right. The 
pointers within the block are not 
altered by this procedure. 
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67 


IDAQLORJ: DELPTR 


The pointers in the index entries 
are eliminated by moving each index 
entry to the left so that it 
overlays the pointer field of the 
next higher-keyed entry. 


IDAQLORJ: BUILDREC 


The following operations are 
performed to re-create an index 
record from a compressed block 
established by tha preceding steps: 


a The right end of tha buffer that 
contains the section of the 
index record to the right of tha 
split point is set to zaros. 


b The first Crightmost) pointer in 
the group of pointers adjacent 
to the header is moved to tha 
end of the index record 
adjoining the RDF. This becomes 
a dummy entry with F and L 
fields set to zero. 


c IDAOLORJ: RJE 


The first Crightmost, or 
low-keyed) entry in the index 
block is eliminated. This is 
done to provide additional space 
for the insert routine. The key 
was previously saved in the 
ICWA. 


d IDAOLORJ calls IDAOIORG CIDAIST) 


The key that was placed in the 
ICWA is front-compressed (Cif 
necessary) and real values are 
established in the dummy entry's 
F and L index~entry fields. 


e If there is insufficient space 
preceding the dummy index entry 
for the insert routine to insert 
the key and if there is 
freespace to the left of the 
index block, the index block is 
moved to the left to overlay any 
freespace that is available. If 
there is no freespace available, 
or if after acquiring all 
available space there is still 
insufficient space to contain 
the key, control is returned to 
the caller, IDAOI9RI, the split 
point is adjusted to the left, 
and IDAO139RI calls IDAO19RJ to 
begin the split process again. 


f If there are two or more keys 
remaining to be moved or if the 
last entry is not a dummy entry, 
the ICWA is adjusted for use by 
the insert routine as follonms: 


The current key is moved into 
the previous key field. 
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The current key length is moved g Steps 67d, e, and f are repeated 
into the previous key length until the test in step 67f is 
field. not satisfied. ) 
The next key to the left in the 68 IDAOIORJ calls IDAOIORZ (CIDAWRBFR) 
index record is uncompressed and 
placed in the current key field. The index buffer containing the new 
index record is written to the data 
The key length is placed in the set and then freed after it has been 
key-length field. written. 
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Notes for Diagram BH1O 


69 


70 


71 
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IDAOLORJ: IDAR (calls IDAOLORZ 
CIDAGRB )) 


The original index record is reread. 
IDAOLORJ: DELSECT 

See Note 63. 

IDAOI9SRJ: COUNT 


The number of index entries between 
and including the first entry to the 
left of the split point and the 
leftmost Chigh-keyed) entry in the 
index record is counted. 


IDAQLORJ: MOVEPTRR 


If enough space exists between the 
header and the leftmost index entry 
for the entry for the entry pointer 
established by the count above, each 
index pointer in the index block is 
moved into the freespace, moving 
from left to right. 


IDAOLORJ: MOVEPTRL 


If there is not enough space for the 
entry pointer, the pointers are 
moved by placing the leftmost 
pointer in the index block into the 
leftmost location in the freespace, 
and by placing the next pointer to 
the right into the next position to 
the right in the freespace until all 
of the pointers established by the 
count are moved. 


High-level index record processing 
is not concerned with pointers that 
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73 


74 


have been moved out of the index 
record by the split process. 
Sequence-set records must maintain 
pointers for control intervals that 
are freed by a control-area~split 
operation and retain pointers to the 
data control intervals that remain 
in the control area being split; 
whereas, high-level index records 
have pointers only to lower-level 
index records that are not moved by 
these processes. 


The steps performed by MOVEPTRR and 
MOVEPTRL are repeated; however, in 
this case, the process is directed 
against the pointers that are 
contained in the index entries to 
the right of the split point, 
instead of to the left. 


IDAOLORJ: DELPTR 
See Note 66. 


Starting with the entry to the right 
of the split point, the index block 
is moved to the left until it 
reaches the pointers that were 
established by prior steps. 


IDAOIORJ: BUILDREC 

See Note 67. 

IDAOLORJ: IDANR 

The index buffer containing the 
revised index record is written to 


the data set, overlaying the 
original index record. 
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Notes for Diagram BI 
l IDAQI9ORL 


An ERASE request must be preceded by 
a GET-for-update request that moves 

the data control interval containing 
the desired record into a buffer. 


IDAO19RU 


If an upgrade set exists, tha 
alternate indexes in it are 
upgraded. (See Diagram BR.) 


2@ IDAOLORL calls IDAOLORS 
For spanned-record processing. 
IDAO1ORS calls IDA0O19RC 

4 IDAO19RS: CLEARSEG 


An unused buffer is obtained and 
filled with binary zeros and a 
free-space CIDF. The RBA of each 
segment is calculated from the index 
and placed in the BUFC. The buffer 
is written for each sagment. 


IDAOLORS: DELSEG 


Entries for all segments except the 
first are removed, and 
free-data-control-interval pointers 
are set up. The entry for the first 
segment is converted to indicate an 
unspanned record. 


5 IDAOLORL 
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IDAOLORL 


When the RDF is a single RDF, it is 
erased. When the RDF is a group RDF 
(that is, two RDFs are combined to 
refer to two or more data records of 
equal length), the following 
processing occurs: 


e If the count of the records 
related to the group RDF is 
greater than two, the count is 
reduced by one. 


e If the count of the records is 
equal to one (which should not 
occur), the two RDFs are 
eliminated and the CIDF is 
adjusted to reflect the increase 
in freespace in the control 
interval. 


e If the count of the records is 
two, one of the two RDFs is 
eliminated and the CIDF is 
adjusted. 


ITDAO019ORM 
IDAO19ORS 


If the entry is the last entry in 
the control interval and can be 
reclaimed, call IDA019SC. 


IDA019SC 


If the erased entry is not in the 
control interval containing the high 
key for the control area, call 
IDA019SD to adjust the freespace 
entry in the index header to reflect 
the available control interval 
status. 
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POINT PROCESSING 


ITAGRAM BJ 
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Notes for Diagram BJ 
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peeved Processing—Key-Sequenced Data 
e 


IDAOLORA 


When the request is keyed, an index 

search must be performed. The index 
level at which the search begins is 

determined as follows: 


® For skip-sequential processing, 
the index search starts at the 
sequence set. The search 
normally starts at the index 
record pointed to by the current 
PLH. If the PLH is invalid, the 
search starts at the first 
record in the sequence set. 


e For direct precessing, the 
search starts at the highest 
level of the index. 


IDAOQ1ORA calls IDAOLORB which 
calls IDAOLORZ CIDAGRB ) 


The index record at which the search 
is to start 1s moved into an index 
buffer. 


IDAOIORBE calls IDAOLORC 


The index record is searched for an 
entry that is greater than or equal 
to the search key. 


IDAOLORE 


When the search is unsuccessful, the 
next record in logical sequence is 
searched. If the search is 
successful and a lower index level 
exists, the search is performed on 
the index records in the lower 
level. 


Keyed Processing—Relative Record 
Data Set 


IDAOLORR 


The relative record number that is 
specified as a search argument is 
converted to the RBA of the control 
interval that contains the record, 
plus the offset of the record in the 
control interval. 
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IDAOLORR calls IDAOLORR CIDARRDRL) 


If the RBA is within the data set, 
the control interval's contents are 
retrieved. If the RBA is not within 
the data set, then: 


e With KGE, end-of-data is 
indicated and positioning 15 
established at the end of the 
data set. 


e Without KGE, no-record-found is 
indicated. 


Addressed Processing 
IDAOLORA 


The RBA that is specified as a 
searcn argument 1s converted into 
the RBA of the boundary of the 
control interval that it falls 
Within. 


IDAOLORA calls IDAOQLORZ CIDAGRB) 
Relative Record Processing 

IDARRDRL calls IDAO1ORZ (IDAGRB) 

The control interval is read by RBA. 
IDAO19SRA 


The control interval is scanned to 
determine whether the key or RBA 
provided as a search argument is 
within the retrieved control 
interval. (Note: The RBA must 
represent a valid record boundary 
within the control interval.) 


When the key search is unsuccessful, 
a test is made to determine whether 
a control interval split has been 
performed by another request-string 
operating concurrently with the 
current request. If a split has 
occurred, processing returns to step 
1 to perform a new index search. 


Relative Record Processing 
IDAOLORR: IDARRDRL 

Positioning is established by 
saving, in the PLH, pointers to the 


record and its RDF and the RBA of 
the control interval. 
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Notes for Diagram BKl 
1 IDAOQLOR1: FINDOPLH 


The placeholder C(PLH) for the 
request string associated with the 
ENDREQ request is located by 
searching the placeholder list for a 
placeholder that points to the RPL 
identified by the ENDREQ. 


IDAOLORP: IDAENDRQ 


Other RPLs Cif any) in the request 
string are prevented from being 
processed by setting a flag in the 
placeholder that indicates that an 
ENDREQ request is being processed. 
(Note: Once a request-string starts 
processing, it continues until all 
the RPLs in the string are processed 
or until an ENDREQ is issued. When 
an ENDREQ is issued, processing 
against the request-string 15s 
terminated when processing of the 
current RPL in the string has 
completed.) If the current request 
is not complete, the WAIT is issued 
to ensure completion. 


IDAO1LORP: IDAENDRQ calls IDA019SM if 
a previous request was MNTACQ@ or 
ACQRANGE to issue multiple WAIT for 
list of ECBs. 


IDAO19SM issues SVC 109 routing code 
6, which calls IGX00006 and then 
IDA0192E to FREEMAIN the WAIT list 
and the ECBs. 

2 IDAOLORP: IDAENDRQ 


Before performing any I/0, the 
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processing is forced into 
synchronous mode to ensure that 
control is not returned to tha user 
until I70 associated with the ENDRE@ 
request is completed. When I/0 is 
completed, asynchronous processing 
is restored if the processing was 
previously asynchronous. 


IDAOI1ORP: IDAENDRQ (calls IDAO19RZ 
(IDAWRBFR ) } 


All unwritten data buffers 
associated with the current 
placeholder are written. 


IDAOLORP: calls IDAOI9RS 


The buffer control block CBUFC) 
chain for the I/O-management block 
CIOMB) in error is searched for a 
BUFC with an error indicator. 


IDAOLORI: RLIENDREQ (calls IDAO19R5) 


Error conditions are analyzed and an 
error message is built. 


IDAQLORP calls IDAOI9RS CIDAEXITR) 


For processing if a SYNAD routine 
exists. 


IDAOLORP: IDAENDRQ (calls IDAO1ORZ 
(IDASBF )) 


Excess data buffers are released 
from the current placeholder. 


IDAOLORP: IDAENDRQ 


The placeholder is released from the 
current request string. 
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Notes for Diagram BK2 
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IDAOLORI: FINDOPLH 


The placeholder for the request 
string associated with the ENDREQ 
request is located by searching the 
placeholder list for a placeholder 
that points to the RPL identified by 
the ENDRE@. 


IDAOLORP: IDAENDRQ 


Other RPLs Cif any) in the request 
string are prevented from being 
processed by setting a flag in the 
placeholder that indicates that an 
ENDREQ request is being processed. 
(Note: Once processing for a 
request-string starts, it continues 
until all the RPLs in the string are 
processed or until an ENDREQ is 
issued. When an ENDREQ is issued, 
processing against the 
request-string is terminated when 
processing of the current RPL in the 
string has completed.) If the 
current request is not complete, the 
WAIT is tssued to ansure completion. 


The processing for step 6 ensures 
that the index entry for the last 
data control interval in the current 
data buffer for the current control 
area will fit in the index record 
for the current control area. 
Otherwise, when processing is 
resumed and when the dummy entry in 
the index record does not have space 
for the key, the data control 


1974,1985 


interval would have to be moved to a 
new control area and have its index 
entry placed in the index record for 
the new control area. 


IDAOLORP calls IDAOLORG 


Before writing the index buffer, the 
following processing is performed: 
IDAON19RG checks the leftmost entry, 
a dummy entry for the current 
control interval, in the index 
record to determine whether a 
maximum length key will fit in the 
remaining index record freespace. 

If there is adequate space to insert 
a key, IDA019RG writes out the 
current index record and frees the 
index-create work area(s) CICWAs). 


If there is inadequate space to 
contain a key for the control 
interval in the current data buffer, 
IDA019RP calls IDA019SA, which 
recalls IDA019RG, in order to have 
the entry inserted into the index 
record. IDAQ19RG returns a no-fit 
indicator to IDA019SA, which forces 
an end-of-control-area situation for 
IDA019SA CEOCA) processing. In 
response to the no-fit indicator, 
IDA019SA CEOQCA) writes out any full 
data buffers (Cless the current data 
buffer) to the data set and acquires 
a new control area. 


IDAOLORP calls IDAOLORZ CIDAWRBFR) 
IDAOLORP calls IDAOLORK 
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DIAGRAM BL. CHECK PROCESSING 


User’s Virtual Storage 


2 


—<——S- —> 1. When the request’s ECB is not posted as being 
complete, a WAIT macro is issued against the 
ECB or list of ECBs for MNTACQ or 
ACQRANGE requests. 


— > 2. Perform error processing if necessary. 


3. Return to the user’s processing program. 
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Notes for Diagram BL 
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IDAOLOR1: FINDOPLH 


The placeholder for the 
request-string associated with the 
CHECK request is located by 
searching the placeholder list for a 
Placeholder that points to tha RPL 
identified by the ENDREQ. 


IDAOIORI: RICHECK 


A WAIT macro is issued to ensure 
that the asynchronous request, for 
which the CHECK was issued, has 
completed. 


IDAOGLORI: RICHECK 


Also performs CHECK processing for 
CNVTAD, MNTAC@, and ACQRANGE. If 
the raquest was CNVTAD, a WAIT is 
issued. 


RICHECK calls IDAO19SM 


If the request for which CHECK 
issued was MNTACQ or ACQRANGE to 
issue a WAIT for lists of ECBs, 
IDAQI9SM issues SVC 109 routing code 
6, which calls IGX00006 and then 
IDA0192E to FREEMAIN the WAIT list 
and the ECBs. For a description of 
IGX0006 and IDAOIIZE, sea / 


Mass Storage System Extensions 


1974,1985 


IDAOLORI calls IDAOLORS 


The buffer control block (BUFC) 
chain for the I/0 block CIOB) in 
error is searched for a BUFC with an 
error indicator. 


Error conditions are analyzed and an 
error message is built. 


IDAOLORI calls IDAOIORS CIDAEXITR) 


For processing if a SYNAD routine 
exists. 


IDAOIOR1: RICHECK 


The check process is repeated for 
each RPL Cif any) in the RPL-string 
associated with the RPL that the 
CHECK was originally issued against. 


The placeholder is released if 
necessary. 


The placeholder remains associated 
with the current request~string 
unless the processing is direct. 
For direct processing, the next 
request must be repositioned to an 
address in the data set. For 
sequential or skip~-sequential 
processing, the positioning 
information established by a prior 
request is used by the succeeding 
request. 
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Notes for Diagram BM 
1 
@ IDA019R8 calls IDA019RO 


Other requests are prevented from 
adding records into the data space 
controlled by the ARDB that is being 
examined by verify. 


IDAOLORO calls IDAOLORZ 
(IDAGRB) and IDAOQLORZ CIDAFREEB) 


Starting with the high-used key in 
an ARDB, retrieve and release 
successive control intervals until a 
software end-of-fila marker, that 
is, a CIDF set to zeros, is found. 
The RBA of the control interval 
containing the software end-of-file 
marker is used to update the 
high-~used RBA in the ARDB. 


6 IDAO19ORO calls IDAOLORB, which 
calls IDAOIORZ CIDAGRB) 


An index record is moved into a 


buffer. (Note: The search starts 
at the highest level of the index.) 
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IDAOLORB calls IDAOLORC 


The index record is searched for a 
key that is greater than or equal to 
the search key. 


IDAO1ORB calls IDAOLORZ (IDAFREEB) 


If the search is not satisfied or if 
lower~level index records exist 
(that is,» the current level is not 
the sequence set), the current 
buffer is released. CIDAOLIRB then 
calls IDAO19RZ CIDAGRB) to retrieve 
another index record and the search 
process repeats itself.) 


IDA019RO 

When the search is successful, the 
pointer in the index entry is 
converted into a valid RBA and moved 
into the ARDB. 

See Note 1. 


See Note 1. 
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Notes for Diagram BN1 
1 Normal Control-Interval Processing 
(NCI) 


Direct Request Processing 
IDAGIORS calls IDAOLORZ (CIDASBF) 


When the prior request was 
saquential, excess buffers in the 
chain of buffers associated with the 
current placeholder (PLH) are 
released. 


IDAO1ORS calls IDAOLORZ CIDAGRB) 


The control interval at a 
user~specified address is retrieved. 


Sequential Retrieval (GET) 
Processing Only 


TDAOLORS calls IDAOIORZ (CIDAGRB) 


When this is the first request after 
Open, the control interval at a 
user-specified address is retrieved. 
Subsequent control intervals are 
retrieved sequentially by IDA019IRZ 
CIDAGNXT). 
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peer oved Control-Interval Processing 


IDAO0L9S1 


The request is decoded. A 
placeholder is obtained. If the 
request is for update, exclusive 
control of the control interval is 
obtained. 


IDAOLOSL calls IDA019S3 


The control interval at a 
user-specified address is retrieved. 


IDAOLORS calls IDAO1ORZ CIDAGNXT ) 
IDAOLORS calls IDAOLORP (IDATJXIT) 


Journaling is performed when a 
journal exit routine exists. 


IDAOLORS calls IDAOLORZ (CIDAFREEB) 
For normal direct requests, the 
buffer associated with the request 


is released before returning to the 
caller. 
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Notes for Diagram BN2 
6 IDAO1ORS calls IDAO1ORZ CIDAFREEB ) 
7 IDAO1ORS 


The DIWA, a serially reusable 
resource, is examined to determine 
whether another request string is in 
control. When the DIWA is active, 
processing of the current request is 
deferred. When the DIWA is 
inactive, it is given an active 
status, which effectively defers 
processing of other requests that 
may be competing for this resource. 


8 IDAOLORS calls IDAOLORZ (CIDASBF) 
IDAOLORS calls IDAO1ORS (IDAEOVIF ) 
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10 


ll 


IDAOQLORS calls IDAOLORK 

IDAO1ORS 

See Note 7. 

IDAOQIORS calls IDAOILORZ CIDAGNNFL ) 
An available buffer is assigned to 
the request and written if 
necessary. 


IDAOLORS 


The user-specified control interval 
is moved into the buffer. 


IDAOLORS calls IDAOLORZ CIDAWRBFR ) 
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Notes to Diagram BN3 
13. Normal Control-Interval Processing 
(NCI) 


The request is invalid if any of the 
following conditions exist: 


e The record length is not equal 
to control interval size. 


e A PUT request specifies LOCATE 
mode. 


e A PUTIX request doesn't speci fy 
update. 


e A stand-alone PUT-for-update is 
issued without specifying user 
buffering. (Note: "Stand-alone" 
A spot that the PUT-for-update 

Ss net preceded by a 
GET= for-update. ) 


The address of the control interval 
to be updated is established as 
follows: 

IDAOLORS calls IDAOIORW CIDAFRBA) 


For sequential requests, the new 
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is 


address calculation is based on 
information in the placeholder. 


For direct requests, the address is 
taken from the RPL 


reppoved Control-Interval Processing 


IDA01L9S1 


The request is decoded. A 
placeholder is obtained. 


IDAOLOSL calls IDAO19S3 


The control interval specified by 
the RPL is written. 


IDAO1ORS calls IDAOIORP (CIDATJXIT) 
Before writing the new control 
interval, journaling is performed if 
a journal exit routine exists. 
IDAO1ORS calls IDAOLORZ (CIDAWREFR) 


The new control interval is written 
to the data set. 


IDAOLORS calls IDAOLORZ (IDAFREEB) 


The buffer is released. 
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Notes for Diagram BOl 


C 1 


C 
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Direct or Skip Sequential Processing 
IDAODLORQ calls IDAOLORR (CIDARRDRL) 


If the data set is not being 
created, or it is being created and 
the control interval is in an 
existing control area, the control 
interval is read and the record 
pointer is set in the PLH. 


Sequential Creation 


IDAOIORR calls IDAOQI1ORZ CIDAFREEB; 
IDAGNXT ) 


If there are no more slots in the 
current control interval and the 
next control interval has already 
been written, the next control 
interval is read into a buffer. 


IDAO1ORQ calls IDAO1ORZ CIDAGRB) 


If there are no more slots in the 
current control interval and the 
next control interval has already 
been written, the next control 
interval is read into an insert 
buffer. 


Sequential Insertion 
IDAOLORQ calls IDAOLORR CIDARRDRL) 


If the previous request was a POINT 
for KGE Ckey greater than or equal), 
1ts search argument is used to 
retrieve the control interval as 
though for a direct request. 


IDAOLORQ calls IDAO19RZ CIDAFREEB, 
IDAGNXT ) 


Otherwise, if there are no more 
slots in the current control 
interval, the next control interval 
is read with read-ahead buffering. 


3 Direct or Skip Sequential Creation 


IDAO1LORQ calls IDAOLORZ CIDAFREEB, 
IDAGNNEFL ) 


If the control interval is not in an 
existing control area, a buffer is 


1974,1985 


10 


il 


12 


13 


obtained and formatted with empty 
slots. 


Sequential Creation 
IDAQLORQ calls IDAO19RZ (CIDAGNNFL ) 


If there are no more slots in the 
current control interval and the 
next control interval is not in an 
existing control area, a buffer is 
ears and formatted with empty 
slots. 


IDAO1LORGQ calls IDAOIOSE (IDAEOVIF ) 
End of Volume does the allocation. 
IDAOLORQ calls IDAO1ORK 


Each control interval is formatted 
with empty slots. 


See Note for step 6. If the 
requested control interval is among 
those formatted, processing 
continues at step 10 


See Note for step 5. 


See Note for step 6. During 
preformatting of control areas, End 
of Volume may have to be called to 
allocate additional space. (See 
Diagram BT1.) 


IDADLORG 


The high-used RBA is at the 
beginning of the next control 
area—except for creation with the 
SPEED option, for which it is at the 
beginning of the next control 
interval. 


IDAOLORQ 


If the slot into which the record is 
to be moved isn't empty, a 
duplicate-record error is indicated. 


The codes that indicate whether a 
slot is empty or filled are given 
under "VSAM Data Set Format™ jin 
"Data Areas." 


IDAOLORQ calls IDAOLORZ CIDAWRBFR; 
IDAFREEB ) 
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Notes for Diagram BO2 length of the updated record must be 
the same as that of the original. 
1 IDAOGLORA 
3 IDAOLORQ 
A PUT-update or ERASE requast must 
be preceded by a GET-update request. The codes that indicate whether a 
slot is empty or filled are given 
2 IDAOLORQ undar "VSAM Data Set Format" in 


"Data Areas." 
For PUT-update processing, the 
§ IDAOLORG calls IDAOLORZ CIDAWRBFR, 
IDAFREEB ) 
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Notes for Diagram BPl 6 IDAOLORY 
1 IDAOLIORY: MRKBF Search a buffer pool for RBAs that 
fall within a given range, and for 
2 IDAOLORY calls IDAOLOSE CIDADRQ) each candidate found that is not 
currently modified or under 
The request is deferred until the exclusive control by another 
buffer has been written. request. Invalidate the BUFC. 
3 IDAOLORY 7 IDAQLORY 
The RBA of the control interval to The placeholder is marked invalid. 


be written is assigned to the buffer 
that contains the control interval. 


C 
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Notes for Diagram BP2 


CWRBFR ) 


: 3 IDAOLORY: WRIBF calls IDAOLORY 


C 


WRBFR writes the buffers associated 
with the BUFCs indicated by the 
request. 


5 Same as Note for step 3. 
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Same as Note for step 3. 
Same as Note for step 3. 


Search a buffer pool for an RBA 
specified through the RPLARG field. 
If the RBA is found and the BUFC was 
marked for output, write the buffer; 
otherwise, return with an error code 
in the RPL. 
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Notes for Diagram BP3 
( 7 IDAOL1ORY calls IDAOIOSE (CIDADRQ) 


The request is deferred until the 
buffer has been processed. 
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Notes for Diagram BQ 


¢ 1 IDAO19ORX 
If the request is a PUT or a POINT, 


C 


no positioning is required. If the 
request is a GET, positioning may 
already have been established by a 
previous GET. 

2 IDAOISRX calls IDAOIORS 
IDAOL9ORX 


The PLH identifies the 
altearnate-index record positioned 
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at; the WAX indicates the pointer 
Within the alternate-index record 
positioned at. The alternate-index 
record contains aither prime-key 
pointers (for a key~sequenced base 
cluster) or RBA pointers (for an 
entry“sequenced base cluster). 


TDAOLORX 

TDAOLORX 

The inner RPL is built by VSAM Open. 
It is used to read the alternate 


index and to gain access to the base 
cluster. 


Method of Operation 151 


Restricted Materials of IBM 


Licensed Materials — Property of IBM 


INDEXES 


GRAM BR. UPGRADING ALTERNA 


“Ja[[@o 9y} OF UINIDY “py 


*[O1]UOD DAISN[IXS WOl} 3[Qe} speidgdn ay} aseajay “¢ | 


"JU 920M JSTM19YJO 
‘p1O991 9} JJaTap ‘s1ayUutod 13Yy}O OU 
SUIBJUOD P1OI3I XAPUL-da}eusa[e IU} JE “TI 












"plodal BJEP ay} O} Jajutod ay} psodal 
XOpul-ayFusaye ayy WO] AAOW IY "TI 
"Ad¥ Plo 94} sey 
JB) PIODII XOPuUI-oJeUIO}e 94} Peay ‘Ol 


& 


sak ON 
{XOPuUl 93eUII}/e OU) 
WO} 3J9]9p 0} AVY 3jeUIIIe Plo Ue 319y) ST “¢ 











"p10991 XApUT-3}RUIS}{E 94} UM *S 
*p1ODaI BJVP 9Y} 0} J9}UTOd 

B P1091 XOPUI-3}BUII}[e 9} 0} PPV °Z 
"pIOI9I MOU B 
Ping Jo ‘p1O5aI B st 9194} JI ‘AY MOU OY} 

SPY JVY} PIOOII XOPUI-9}eUII}[e 94} Pesy “9 


SaA 
,Xaput ajeu 
-19}[© 3Y} 0} ppe O} Ady a}BUIA}]e Mau B 3I9Y) ST “S 








ON 








‘Jas apeivdn ay} 
UI XIPUL 32BUIIIIE YI 10) 7] -¢ Sdays pBeaday 


= 


—— “3]Qe)] apeIsdn ay} JO [O1]UOD JAISNIIXA 4d‘) “p 


jpesueyo pyety Ady 9yeuJo}[e Aue sey 7 


Sa, ON 
(aepdn-[ nd 10} dutpesddn sy °Z 


SBEIO}S [NINA S.195F) 


(+1) 3 ‘Splaty hay Sy Jo [Te 


SUTE}UOD JEY} P1OIII JEP sy} JO UOTWOd ay} OARS “| 


:338pd()-LaD 104 









(ium ON SAA r = 


Td apessdyy 


YOTTL 
“ 
| prc] | 


I days jo yndyno 


psosay ejeg 


psooay | 
H1Td} 





aBeJOIS JENNA $,195() 


‘ASVUd 10 LNd 204 Cy) (in YotaY in s 
YS 


© Copyright IBM Corp. 1974,1985 


LY26-3907-1 


152 MVS/XA VSAM Logic 


C 


C 


Restricted Materials of IBM 
Licensed Materials —~ Property of IBM 


Notes for Diagram BR 
1 IDAO19RU 


The LLOR is just large enough to 
contain the "Least length of the 
data record" that contains the 
record's prime key, if any, and all 
its alternate keys. 


5 IDAO19RU 


For ERASE, there can be no new 
alternate key to add. For 
PUT-insert, there is a new key. For 
PUT~update, there is a new kay if 
the alternate key for the alternate 
index being upgraded has changed. 


6 IDAO19RU calls IDAO19R4 
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12 
13 


IDAOLORU 

IDAOI9SRU calls IDAO19R4 

IDAO1LORU 

For PUT-insert, there can be no 
alternate key to delete. For ERASE, 
there is a kay to delete. For 
PUT-update, there is a key to delete 
if the alternate key for the 
alternate index being upgraded has 
changed. 

IDAO19RU calls IDA019R4 

IDAO19ORU 

IDAO1ORU calls IDAO19R4 


IDAO1LORU 
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Notes for Diagram BS1 
IDAO19RZ is the buffer management 


interface module. 


For buffer management 


without shared resources, it calls 
IDA019R2; for buffer management with 
shared resources, it calls IDAOI1ORY. 


1 


LY26-3907-1 


Removal of exclusive control allows 

other requests for the data control 

interval in the current buffer to be 
satisfied. 


Processing without Shared Resources 
IDAOLORZ: IDAFREEB calls IDAO19R2 


If share-option 4 is specified, the 
buffer contents are forgotten. 


If the data insert buffer or an 
index buffer is being freed, the 
test-and-set byte is cleared and 
exclusive control is released. 


If the buffer being freed contains a 
segment of a spanned record, 
IDAO19R2Z releases exclusive control, 
but ensures that exclusive control 
is kept for the buffer that contains 
the first segment. 


Processing with Shared Resources 
IDAOLORZ: IDAFREEB calls IDAOLORY 


If the buffer being freed has been 
modified, its modification mask is 
set to indicate the transaction ID 
of the modifier. If the buffer 
doesn't contain a segment of a 
spanned record held in exclusive 
control, exclusive control is 
released, the use count in the BUFC 
is decremented, and, if share-option 
4 is specified, the buffer is marked 
empty. 


IDAO1ORZ 
IDAO19R2 


If the user is retrieving records 
sequentially or if a control area is 
being split, reading ahead speeds 
processing by reading data into 
buffers before it is requested and 
while previous data is being 
processed. 


IDAOLOR2: RDAHEAD calls IDAOI1SRW 
CIDAFRBA) 


During the loop represented by steps 
5 through 7, if a buffer is 
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encountered which has I/0 
outstanding, control is passed to 
step 8 before doing the locate 
processing at step 5. 


If the return code from IDAFRBA 
indicates that the end of a control 
area has been reached, control is 
passed to step &8. 


If IDAFRBA sets an end-of-data flag 
in the RPL, then an invalid-RBA flag 
is set in the current buffer, the 
error flags set by IDAFRBA in the 
RPL are cleared, and control is 
returned to step 8 


IDAOL9OR2: GETEXCL 


IDAO1IRZ initializes the RBA fields 
and read flags of the BUFC of each 
empty buffer if: 


@ The read threshold has been 
reached (the number of buffers 
required for read-ahead 
buffering have been freed), 


e The request is for sequential 
retrieval, 


e The request is for a 
control-area split, or 


° The request is for 
spanned-record retrieval. 


After the BUFC is updated, the 
control interval specified in the 
BUFC is placed under exclusive 
control. If the PLH indicates that 
the current request requires 
exclusive control (for example, if 
it is an update request), the 
exclusive-control flag in the 
current BUFC is set on. 


Exclusive control is immediately 
relinquished and error return codes 
are set if: (Ca) the input RBA 
specified in the current BUFC falls 
Within a control area which is being 
split, or if €b) another BUFC with 
exclusive control specifies the same 
input or output RBA as the input RBA 
specified in the current BUFC. 


IDAO1I9OR2 calls IDAMLORS 

IDAQ19R2 

Before returning to the caller, 
IDAO1L9OR2 advances the data-buffer 


address in the PLH to the next 
available data buffer. 
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Notes for Diagram BS2 


This diagram describes the get-RBA 
function of buffer management. 


3 IDAOQLORZ: IDAGRB calls IDAO19R2 


The BUFC for the current data buffer 
is examined to determine whether the 
requested control interval is 
already in the buffer and whether 
there is an exclusive-control 
conflict. If the requested control 
interval is already in the current 
data buffer and there isn't an 
exclusive-control conflict, IDA0D1LIR2Z 
returns to the caller. If the 
requested control interval isn't in 
the buffer or if there is an 
exclusive-control conflict, the 
requested control interval must be 
read into the data buffer. 


(There is an exclusive-control 
conflict if the user changes a 
request from simple retrieval 
Cnonexclusive control) to 
retrieval-with-update (exclusive 
control). In this case, the BUFC 
would indicate nonexclusive control 
for the simple retrieval, and the 
placeholder would reflect exclusive 
control for the 
retrieval-with-update. ) 


When a read is required and 
exclusive control of the control 
interval is needed (that is, the 
user 1S doing a read-for-update), 
tests are performed to determine 
whether the control area containing 
the requested control interval is 
being split or whether a BUFC 
associated with another placeholder 
has the control interval under 
exclusive control. If either of 
these conditions exists, IDA019R2 
sets an error code and returns to 
the caller. If neither exists, the 
BUFC for the current data buffer is 
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13 


14 


15 


given exclusive control of the 
control interval. 


IDAQIOR2: RDAHEAD 


For sequential retrieval or 
control-area splits, reading ahead 
Canticipatory buffering) speeds up 
processing. 


IDAOLOR2Z calls IDAO1ORW (CIDAFRBA) 
IDAO1ORZ calls IDAOLORY 


No string can own more than one 
index, one data, and one insert 
buffer at a time. IDAOISRY enforces 
this rule by freeing a buffer if the 
request would otherwise violate the 
rule. 


If data is in the process of being 
read into the buffer, IDAOIIRY calls 
IDAODLSSE CIDADRQ) to wait until I70 
has completed. If the use count is 
incremented to more than one and the 
request is for exclusive control, a 
read-exclusive error is indicated. 


IDAOLORY 


If a buffer not in use is found, it 
is written if its contents have been 
modified, and the read flag in its 
BUFC is set on. If no buffer not in 
use can be found, a logical error is 
indicated, and processing continues 
at step 16. 


IDAOQI9R2 or IDAOLORY calls IDAMI19ORS 


The specified control interval is 
read into the buffer associated with 
the current placeholder. 


IDAO1OR2 or IDAOLORY calls IDAQL1ORZ 
(IDAWAIT ) 


IDAWAIT waits until I/0 is completed 
and tests whether a read error has 
occurred. If so, an RPL error code 
is returned to the caller. 
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Notes for Diagram BS3 
18 IDAOIORZ: IDAGRB calls IDAO19R2 


The index buffer pool has for each 
placeholder one index buffer that 
holds a sequence-set index record. 
When there are additional index 
buffers, the first one contains the 
highest-level index record, and the 
others contain intermediate-level 
index records. 


19 IDAOLOR2 


When a buffer is available, the 
highest~level index record is kept 
in it (for nonecreate processing) for 
as long as the record continuas to 
be the highest-level record. If the 
number of entries required to index 
the records in the next-lower level 
becomes too large for the 
highest-level record, a higher level 
is created. (The highest level of 
an index always has only one 
record.) 


22 IDA019R2 


Intermediate-level index records are 
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24 


26 


kapt in a buffer for as long as 
possible-that is, until a buffer is 
required to read in another index 
record. 


IDAOLOR2 


When the specified RBA in step 22 is 
not in a buffer, a free buffer is 
assigned to the requast. If no 
buffers are free, one is made free. 
Buffers containing 
intarmediate-level index records are 
candidates to be used. In some 
cases evan a buffer containing the 
highest-level record or a 
sequanceset record is used. 


IDAO19R2: READBFR calls IDAMI9R3 


The specified control interval is 
read into the buffer associated with 
the current placeholder. 


IDAOIOR2 calls IDAO1ORZ (CIDAWAIT) 
IDAWAIT waits until I/0 is completed 
and tests whether a read error has 


occurred. If so, an RPL error code 
is returned to the caller. 
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Notes for Diagram BS4 


The find-RBA function of buffer 
management, which is used in sequential 
retrieval operations, finds the RBA of 
the next control interval in collating 
sequence for keyed sequential requests 
or in entry sequence for addressed 
sequential requests. 


1 IDAOIORZ calls IDAO1ORW CIDAFRBA) 


A key-sequenced data set may be 
processed by addressed sequential 
access. If control-interval or 
control-area splits have occurred, 
records retrieved by addressed 
access may not be in the same order 
as records retrieved by keyed 
access. That is, the entry sequence 
of records may not be the same as 
their key sequence. 


2 IDAOLORW: IDAFRBA 


Before the current control-interval 
address in the placeholder is set to 
the RBA of the physically next 
control interval, IDAFRBA tests 
whether some buffers await I/0 and 
whether the current control interval 
1s the last one in a control area. 
If both conditions hold, IDAFRBA 
returns to the caller rather than 
set the RBA in the placeholder 
ahead. The reason for this is to 
avoid potential problems for 
sequential update processing and 
end-of~volume processing. 


If the control intervals in a key 
range are exhausted, the address in 
the PLH is advanced to that of the 
first control interval in the next 
key range. If there are no 
additional key ranges for the data 
set, IDAFRBA returns an end-of-data 
error indicator to the caller. 


3 IDAO1ORW: IDAFRBA 


If a control~interval split has 
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modified the sequence-set itndex 
record in the buffer, the record is 
reread before processing it any 
further. 


IDAO19RW: IDAFRBA calls IDAMI9OR3 
IDAOIORW: IDAFRBA 


If the I/0 manager returns an error 
code, IDAFRBA returns to the caller. 


IDAOLORZ: IDAWAIT 


If the specified I/0 request has 
completed, processing continues at 
step 6. If a synchronous request 
hasn't completed, IDAWAIT issues a 
WAIT macro on the ECB for the indax 
and processing continues at step 6 
when the request completes. For an 
asynchronous request, IDAWAIT 
returns to the user's problem 
program, unless an []/0-completion 
interrupt occurs, in which case 
processing continues at step 6. 


IDAO019RC 


The highest~keyed entries in each 
section are searched from right to 
left (that is, from lower to higher) 
until the entry whose key is greater 
than or equal to the search argument 
is found. Then the entries in that 
section are searched from right to 
left until the entry whose key is 
equal to or greater than the search 
argument is found. 


IDAO1ORW: IDAFRBA 


Before advancing to the sequence-set 
index record, IDAFRBA tests whether 
all processing related to the 
current control area is completed 
Csee Note for step 2). If some 
processing remains, IDAFRBA returns 
to the caller. 
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Notes for Diagram BTl 


processing. VSAM End of Volume is 
called by End of Volume when SVC 55 is 
issued by VSAM record management. VSAM 
End of Volume provides these services: 


e When the GET routine detects that 
the requested record is not on any 
of the currently mounted volumes for 
the data set, a volume is demounted, 
if necessary, and the volume that 
contains the requested record is 
mounted. 


( Diagram BT describes VSAM End-of-Volume 


e When a PUT request cannot be 
completed because there is no more 
space in the object, additional 
space is allocated to the object. 
The amount is based on the object's 
space allocation requirement. If 
enough space is available to satisfy 
the object's space allocation 
requirement, the space is allocated 
from the free space in: 


- First, the VSAM data space 
containing the object. 


- Next, the volume containing the 
object. If an object's key 
range is assigned more space, 
space is allocated from the 
volume containing the key range 
if the object has not been 
assigned an overflow volume. 

= Otherwise, (for key range only) 
space is allocated from another 
volume that has been assigned to 
the key range's object as an 
overflow volume. 


- Finally, another VSAM volume 
that has been assigned to the 
object as a candidate volume. 


1 IDAOSS7A 


The request is either to handle an 
end~-of-volume condition or to update 
information in the catalog. 


@ IDAO0557B: VSIUPD CATUPD (which calls 
IDA0192C ) 


VSIUPD issues the CBUFSVC (SVC 109) 


to update the VSAM shared 
information block (VSI). 


C 
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CATUPD calls VSIUPD to update the 
VSAM shared information block (VSI) 
before updating the VSAM catalog. 
The AMDSB contains statistics for 
the data set. 


IDA0557B: VOLLOC (calls ARDBSCH) 


The volume information sets of 
fields Cin the object's catalog 
record) contain the volume serial 
number of each volume Cused or 
candidate) assigned to the object. 
The voluma information sets of 
fields also contain the low and high 
key values of each key range, and 
the low and high RBA values of each 
extent in the object. 


If the end-of-volume request is for 
more space on the currently mounted 
volume, the volume’s serial number 
is in the end-of-data ARDB. 


IDAOS5S7B: VOLLOC (calls VOLMNT ) 


The VSAM volume mount and verify 
routine CIDA0192V) confirms that the 
specified volume is mounted. If no 
device is available for the volume, 
the VSAM volume mount and verify 
routine requests that the operator 
demount a volume not in use. If all 
devices contain volumes currently in 
use, the routine sets the 
volume~not~=mounted return code and 
returns to the caller. 


IDA0557B: ALLOCSPC 


If the AMBXN's allocate-space 
request option indicator is on, End 
of Volume gets more space for the 
object. 


For details about the AMB and the 
AMBXN, see "Data Areas." 


IDAOS57B: ALLOCSPC (calls CATALC) 


The volume catalog record defines a 
VSAM direct access volume in terms 
of the objects it contains, tha VSAM 
data spaces it contains, and the 
available (free) space in each of 
its data spaces. 


For details about the volume catalog 


record, see Catalog Diagnosis 
Reference. 
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DIAGRAM BT2. VSAM END OF VOLUME: ALLOCATING ADDITIONAL SPACE TO A VSAM OBJECT 
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Notes for Diagram BT2 


8 IDAO0S557B: VOLSW (calls CATLOCNC 
( and VOLMNT ) 


If the key range's object has an 
overflow volume assigned to it, 
additional space for the key range 
is allocated from the overflow 
volume. If no overflow volume is 
assigned to the object, steps 8 
through 10 are bypassed and the 
Space is allocated from the object's 
candidate volume. 


9 IDAO5S7B: VOLSW (calls CATALC 
and CATUPDVO) 


The object's catalog record 
describes its space allocation 
requirements. 


10 IDA0557B: VOLSW (calls CATLOCNC) 


If there is not enough available 
space on the overflow volume to 
satisfy the allocation requirements 
of the key range, space is allocated 
fron the object's candidate volume. 


11 IDAOSS7B: ALLOCSPC (calls VOLSW) 


If the volumes are full, and no 
other volume (candidate) is assigned 
to the sbject, End of Volume sets 
the space-not-allocated return code 
and returns to the caller. 


ww For a description of how candidate 
volumes are assigned to VSAM 
objects, see Access Method Services 
Reference 


12 IDAOQ557B: CATALC 


If the data set being extended is a 
VSAM data set cataloged in an ICF 
catalog, call IDA0557X. Otherwise, 
issue SVC 26 to perform the extend 
processing. 


The object's catalog record 
describes its space allocation 
requirements. 


For details about the catalog record 
and the volume information 


set-of-fields, see Catalog Diagnosis 
Reference. 


C 
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15 


17 


18 


IDAOS557B: CTLBLK (calls DSCTLBLK) 


For details about the ACB and the 
EDB, see "Data Areas.” For details 
about the DEB, see the Debugging 


Handbook and Data Areas microfiche. 


End of Volume builds a new DEB and 
EDB that replace the existing DEB 
and EDB. The new DEB and EDB 
contain extent information that 
describe: 


e Each of the object's extents Con 
currently mounted volumes) that 
was not affected by the 
End-of-Volume process. 


e Each extent that defines the 
object's nawly obtained space 
Cif any). 


° None of the object's extents on 
volumes that were demounted. 


IDA0192D 


This module issues an ACQUIRE to the 
Mass Storage System. 


IDAOS5SS7B: DSCTLCLK (calls CATLOCXT 
and CATLOCRB } 


For details about the data set 
catalog record, and the volume 
information set-of-fields, see 


Catalog Diagnosis Reference. 


For details about the EDB, see "Data 
Areas." 


IDAOSS7A: SMFUPD (calls CATLOCDS) 


For a description of SMF record type 
64, see System Managemen 
Facilities. 


IDAO557A: TERM, PROBDET 


For details about the VSAM see 
"Diagnostic Aids.™ End~-of-Volume 
return codes. 


If an error is detected, End of 
Volume attempts to determina the 
type of error and builds a message 
describing the error. 
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IDAIIPM1: QISAM PUT Processing 


To handle an ISAM PUT~Locate 
request, VSAM uses the 
ISAM~Interface buffer to contain 
records to be written. For ISAM 
PUT~move requests, the user supplies 
the buffer. (Note: In both cases, 
VSAM treats the buffer as the user's 
work area, and transfers records to 
its own output buffers before 
writing them. ) 


For ISAM resume-load requests, a 
GET-locate is issued to VSAM to 
search the previously created data 
set for a key greater than or equal 
to the key of the first record to be 
written by resume-load. If the VSAM 
Search is unsuccessful, it 15 
assumed that the previous last key 
and the new key are in correct 
sequence, and load processing 
continues. 


A successful search indicates that 
the new key is less than a key 
already in the data set (a logical 
error); and control is passed to the 
user's ISAM SYNAD routine if it 
exists. Otherwise, an ABEND is 
1ssued. 


IDAIIPM2: QISAM GET Processing 


If the ISAM GET request is preceded 
by a SETL request Cused to determine 
whether the located record was a 
deleted record), the retrieved 
record is moved from the 
ISAM-interface buffer to the user's 
buffer and a VSAM GET macro is not 
issued. 


When the ISAM GET request is in 
locate mode or specifies data-only, 
the ISAM-interface buffer is used 
for the record; otherwise, the 
user's buffer is used. (Note: 
Data-only implies that the key 
resides at the beginning of the data 
record; the relative key position of 
the record is 0.) =A VSAM GET macro 
is issued. If the request specifies 
move-mode and data-only options, the 
data (minus the key) is moved into 
the user's buffer. When a deleted 
record is retrieved, and such 
records are to be ignored, 
successive GET macros are issued 
until a normal record is retrieved. 


IDAIIPM2: QISAM PUTX Processing 


If the record to be written had only 
the data portion of the record 
retrieved (see Note 2), the data is 
moved from the user's buffer to the 
ISAM-interfaca buffer to rejoin its 


key before it is written; otherwise, 
the complete record already resides 
in the appropriate buffer. 


The record is then examined to 
determine whether it is marked as a 
deleted record. Deleted records are 
ignored, if requested, by issuing a 
VSAM ERASE macro to eliminate the 
original record from the data set. 

A VSAM PUT macro is issued for those 
records that are to be written. 


IDAIIPM2: QISAM SETL Processing 


The validity of the request ts 
tested, and if two SETL requests 
have been issued without an 
intervening GET, PUTX, or ESETL 
macro, an invalid SETL macro has 
been issued or an invalid generic 
key has been used. An invalid 
request error code is set and 
control is passed to the 
ISAM~interface SYNAD routine (see 
Note 11). 


If the request is valid, the address 
of the key to be located is placed 
in the RPL, and a VSAM POINT macro 
is issued. 


If the data set contains deleted 
records and if the request is 
directed at a specific record's key, 
a VSAM GET macro is issued to 
retrieve the record. If the record 
is a deleted record, a 
no-record-found indicator is set in 
the DCB and control is passed to the 
ISAM-interface SYNAD routine (see 
Note ll). 


IDAIIPM2: QISAM RELSE Processing 


This request is ignored by the 
ISAM-interface routine, and control 
is immediately returned to the user. 
The release function is not required 
by ISAM-interface or VSAM because 
each QISAM request handled by 
ISAM-interface uses only a single 
data record for request processing. 


IDAIIPM2: QISAM ESETL Processing 


A VSAM ENDREQ macro is issued to 
release any VSAM resources. ISAM 
interface resets the scan-mode 
indicator in the IICB, which enables 
another SETL request to be issued, 
and returns control to the user. 


IDAIIPM2: QISAM EODAD Processing 


This routine receives control when 
VSAM reaches an end-of-data 
condition. The ISAM EODAD routine 
is given control if one has been 
specified; otherwise, an ABEND is 
issued. 
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Notes for Diagram BU2 
7 IDAIIPM3: BISAM WRITE Processing 


The ISAM-interface RPLs are searched 
for one that is associated with the 
current request'’s DECB. If an RPL 
is not found, an available RPL is 
assigned to the request and 
initialized. If an RPL is not 
available, an invalid request is 
indicated in the DECB anda return 
is made to the user's problem 
program. 


If the write request is an ISAM 
stand-alone-write for update, VSAM 
GET-for-update and PUT-for-updata 
macros are issued to satisfy the 
request. 


For a write request to overlay an 
existing data record with a deleted 
record, the VSAM PUT macro is issued 
to satisfy the request unless the 
option to ignore the deleted record 
is specified. In this case, the 
ERASE macro is issued. (Note: 
Deleted records have a X'FF! in 
their first byte.) 


For a write-key-new request, a VSAM 
PUT is issued. If VSAM returns an 
error code indicating that the 
record to be written is a duplicate 
of an existing data record, 
ISAM-interface issues a VSAM GET to 
ratrieve the existing data record to 
determine whether it is a deleted 
record. If the record is a deleted 
record, a VSAM PUT-for-update 
request is issued to replace it with 
the new record. 


When VSAM returns control, the 
ISAM-interface RPL is released 
(disconnected from the DECB), a VSAM 
ENDRE@ macro is issued to free the 
VSAM resources, and the request is 
posted complete. 


8 IDAIIPM3: BISAM READ Processing 


The RPLsS are searched for one which 
is associated with the current 
request's DECB. If an RPL is not 
found, an available RPL is assigned 
to the request and initialized. If 
an RPL is not available, a return is 
made to the user's problem program. 


After establishing the buffer to be 
used (that is, an ISAM buffer or an 
ISAM-interface buffer) and adjusting 
the record pointer to include a 
record descriptor word (RDW) for 
variable-length records, a VSAM GET 
macro 15 issued. 


When VSAM returns control, the 
ISAM-interface RPL is released 
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ll 


(disconnected from the DECB) and a 
VSAM ENDREQ macro is issued to free 
the VSAM resources, unless the ISAM 
request was a successful 
read-for-update. 


IDAIIFBF: BISAM FREEDBUF Processing 


This routine issues a SYNCH SVC to 
get into problem program state and 
then searches the ISAM~interface 
request-string for an RPL associated 
with the current ISAM DECB. When 
found, a VSAM ENDRE® macro is issued 
to free the resources held by the 
RPL. The RPL is then disconnected 
from the DECB. If an associated RPL 
is not found, a return is made to 
the user's problem program. 


If the RPL is found and processing 
of it is complete, a VSAM ENDREQ 
macro is issued to free the VSAM 
resources, and then the 
ISAM~-interface RPL is released 
(disconnected from the DECB) ‘for 
reuse by another request. 


IDAIIPM3: BISAM CHECK Processing 


The ISAM~interface chack routine 
tests for an error code in the DECB 
(see Note 3). If an error is not 
detected, a return is made to the 
user's problem program. If an error 
is detected, the check routine 
passes control to the user's ISAM 
SYNAD routine if it exists; 
otherwise, an ABEND is issued. 


IDAIISM1: ISAM-interface SYNAD 
Processing 


The ISAM-interface SYNAD routine is 
entered by a VSAM processing routine 
when an error condition is datected. 


For QISAM processing, the VSAM error 
codes in the RPL are copied into the 
DCB, and for BISAM processing, the 
aeror codes are copied into the 


For QISAM processing, control is 
passed to the user's ISAM SYNAD 
routine if it exists. If it does 
not exist, an ABEND is issued. 


For BISAM processing, a return is 
made to VSAM, which returns to the 
ISAM-interface BISAM processing 
routine and then to the user's 
problem program. An ensuing ISAM 
CHECK macro causes the user's ISAM 
SYNAD routine to receive control if 
it exists (see Note 10). 


The ISAM-interface SYNAD routine 
also builds the SYNADAF message. 
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G V OR A N E OCESSIN 
TRACE (Parameter Processing) 
JOB STARTS 
User Job Stream 
| 
//DD1 DSN=NAME, 
! AMP=(‘TRACE= a —— 
| 


| 

| 

See 
(PARAMETERS)’) ! l 


JFCBTRAC=ON 
| 1. Verify “AMP” parameters and | | 

















: | | 
| update JFCB | |JFCBEXT ) 
ee We 
TRACE (OPEN Processing) 
| PARM | 
IDA0192Z | PARM2 | 
! [3 Was TRACE requested? | : ee ! 
D l 
| OPEN Work — | ECODE | 
! Area | Yes OPEN Processing {________ 
ae 
Data Index 
AMB AMB 
3. Base cluster being opened? | Od rc 
-—— , | | 
| | No || | 
JECBEXT | | bo 
4. Obtain storage for TRACE work User Storage 
area. IDATRACE 
JFCB | 
| | to the TRACE work area 
———aw (IDATRACE) address. 


iy 


6. For PATH OPEN, copy base 
AMBTRACE to path AMBTRACE. 


7. For UPGRADE OPEN, copy base 
AMBTRACE to upgrade AMBTRACE. 


Y 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
5. Set index and data AMBTRACE | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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Notes for Diagram BVl statement. The "AMP" data is parsed 
and moved to the JFCB and JFCB 
1 IEFNB902 is called from the extensions. 
reader/interpreter CIEFNB901) at job 
initialization when an "AMP" 2 If JFCBTRAC is on, record management 
subparameter is found on a DD trace is invoked. 


C 


L¥26-3907-1 © Copyright IBM Corp. 1974,1985 Method of Operation 171 


Restricted Materials of IBM 
Licensed Materials — Property of IBM 


ITAGRAM BV1. RECORD MANAGEMENT CE OCESSING (CONTINUED ) 








No YS en Step 23 
20. Build GTF record. 


Any VSAM Record Management Module J 
TRACE HOOK | 
AMB | | 
= a 
| | | 8. Is trace active? | 
AMBTRACE Continue with 
| | | Yes No R/M Logic | 
| | | : 
| 9. Call R/M Trace (IDA019ST) | 
| . Continue with 
| 10. Return from trace ES R/M Logic | R? 
ee | 
IDA019ST 
11. Does Register 2 contain a PLH address? PLH 
| Yes No op Step 10 | | 
IDATRACE | f | ) | 
| | | 12. Save Registers 12 through 14. SS PLHRET] | 
| Common | | | | | 
| one | | 13. Find an available unique area in | 
| | IDATRACE. ) 
| | | 14. Save Registers. IDATRACE 
Unique | | —————— 
| ae 15. Copy PARM1/PARM2 to unique area. ——_______ | | 
| | | Common | 
4 | 16. Are conditions correct for tracing? | Area | 
| | | ‘i NO gue Step 10 | | 
Uni ——<—4 
| rea | | 17. Locate/validity-check control blocks | [ 
| | as specified in PARM1/PARM72. | Unique ! 
Area | 
| | 
| 18. Was a bad control block found? | | 
| Unique | | No Yes =u Turn on —— 
| Areas | | “BADCB” HW) | | 
| | | Unique 
SS , 19. Was validity-check-only specified and | | Area 2 | 
| no bad control block found? | | | 
| |__| 
| | 
| 
| 
| 
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Notes for Diagram BV1 (continued) 


Ll. 


12. 


i3. 


L¥26-3907-1 


A trace point checks if AMBTRACE is 
nonzero. If nonzero, AMBTRACE 
contains the address of IDATRACE. 
IDATRACE is built by VSAM OPEN 
CIDA0192Z). The first word of 
IDATRACE contains the address of 
IDAO019ST. This address is used to 
"call™ (step 9) the trace routine. 


When IDA019ST is entered, register 
2 must point to a PLH and register 3 
to an AMB. 


The caller's reagisters 12, 13, and 
14 are saved in the PLH R14 pushdown 
stack. This frees up enough 
registers for IDA019ST to initialize 
processing. 


The work area IDATRACE contains a 
common area and as many unique areas 
as the data set's STRNO (string 
number). The common area contains 
fixed fields (such as PARM1, PARM2, 
ERRCD, trace point IDs, number of 
unique areas, etc.). The unique 
areas contain unique data (such as 
save areas, control block address, 
etc.). A unique area is locked on 
entry and unlocked on exit (step 
25). Any additional calls to trace 


© Copyright IBM Corp. 


1974,1985 


16. 


18. 


19. 


20. 


while this call is current will 
obtain their own unique area because 
this call's area is locked. 


The conditions for tracing include: 


e The calling traca point ID must 
be equal to that raquested by 
the user. 


° If specified, the KEY or ECODE 
subparameter must be correct. 


If validity-check-only and a bad 
control block is found, tha flag 
"“BADCB" is turned on. TRACE 
restarts, tracing control blocks at 
this tima. 


If validity-check-only and no bad 
control blocks are found 
(BADCB=OFF), continue locating the 
control blocks specified in PARMI or 
PARM2 subparameter. 


A GTF record is created. The record 
contains control information and 
control block data. Each GTF record 
can contain up to 249 bytes of 
control block data. If the control 
block is greater than 249 bytes, 
more than one GTF record is created. 
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DIAGRA BVI VSAM RECORD ANAGEMEN RAY & Al ob 18a NYVEL 
IDAO19ST (continued) J 
[ee | 


21. Issue GTRACE macto to pass 


a record to GTF. 
/ Monitor 


Call 14 
CONTROL BLOCKS COMPLETED 


to do? 


Yes No pS © tC 24 


' 


23. Using PARM2, repeat steps 17 to 22 


| 
| 
| 
| 22. Any AIX, PATH, or UPGRADE processing 
| 


TRACE COMPLETE 


25. Unlock unique area. 


| 
| 
| 24. Restore caller’s registers. 
| 
| 
| 


26. Retuntocalel. TT Step |( 


J 
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Notes for Diagram BV1 (continued) 


21 GTRACE macro expands to a monitor 
call 14. 


Steps 17 through 21 are repeated 23 
until all the control blocks 
requested are traced. 


22 Check for PARM2: 
e If PARM2 is found, check if 
there is an AIX, PATH, or 


UPGRADE data set associated with 
tha data set just traced. 
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e If PARM2 or associated data set 
is not found, go to step 24 to 
process the return to VSAM 
record management. 


Another VSAM-opened data sat 
(UPGRADE or BASE for a PATH, UPGRADE 
for a BASE, etc.) has bean 
determined to be traced. Move and 
use PARM2 in the unique area. 

Repeat staps 17 through 22 until all 
associated date sats have been 
traced as requasted. 
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GRAM BW ERMRPL PROCESSING 


User’s Virtual Storage > 


BB2 


1. TERMRPL is intended to be called by a system 
component’s ESTAE routine to release the 
VSAM resources associated with an abnormally 
terminated RPL 


2. TERMRPL determines which resources are held 
by the RPL and releases the resources so other 
requests sharing the same data set may be satisfied. 


Various VSAM 3. Return to caller. 
control blocks 





J 
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Notes for Diagram BW 


( 1 IDAO1OR1: TERMRPL 


C 


IDAO19R1 (TERMRPL) calls IDAOLORI 
(FINDOPLH) 


The placeholder (CPLH) for tha 
request string associated with the 
TERMRPL request is located by 
searching the placeholder list for a 
placeholder that points to tha RPL 
identified by the TERMRPL. 


IDAOLORI (TERMRPL) calls IDAOI19SN 
2 IDAO019SN 

Validity checks the data set 

attributes, RPL options, and 

processing conditions before 

performing the TERMRPL request. 

Releases all owned VSAM resources 

that are commonly shared by other 

requests. 

IDAOQISSN calls IDAOI9RZ (IDAFREEB) 


If the data set is a KSDS, IDA019SN 
calls IDAO019RZ CIDAFREEB). IDAFREEB 
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fraes the index buffer(s) that 
belong to the placeholder. 


IDAO19SN calls IDAOILORZ (CIDASBF) 


Excess data buffers are released 
from the placeholder for reuse. 


IDAOLOSN calls IDAO1OSE (CIDARSTRT) 


An attempt is made to restart all 
deferred synchronous requests that 
are not in the same address space as 
the RPL identified by TERMRPL. 


If a deferred request that needs 
restarting is asynchronous, an error 
code will be returned to the user 
indicating TERMRPL cannot restart an 
asynchronous request. 


IDAO19SN 

The placeholder is disconnected and 
any positioning information 
associated with this RPL is lost. 
IDAOLORI: TERMRPL 


Return to the caller with completion 
code set in Register 15 and RPLFDBK. 
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Notes for Diagram BXl @ For RRDS, the RBA is calculated 


from the RRN. 
1 IDAO1OR1 calls IDA019S8G 
| e For KSDS, an index search 


If the request is CNVTAD, call parameter list CIDAIXSPL) is 
IDA019SG. built, and IDA019RB is called to 
search tha index. 
2 IDAO19SG calls IDAOLORB, IGX00006 
A volume serial is obtained for each 
Each IDACNVPL argument is converted RBA by calling IGX00006, which 
to an RBA value. issues SVC 26 (CATLG macro) to 
"locate™ the volume serial. For a 
° For ESDS, the RBA is validity description of IGX00006, see OS/VS2 
checked. MVS Mass Storage System Extensions 


Logic: MSS Communicator (MSSC). 


C 
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Notes for Diagram Bx2 


( 1 IDAOLORI calls IDAOL1OSL 


C 


If the request is MNTACQ, IDA019SL 
is called. 
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IDAOLOSL calls IDAEOVIF 


IDAEOQVIF is called to mount the 
volume. 


IDAO19SL calls IDAMSSIF 
IDAMSSIF is called to issue SVC 109 


route code 6 to acquire the data 
cylinders corresponding to the RBAs. 
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Notes for Diagram Bx3 


( 1 IDAQIOR1 calls IDAO19SH 


C 


If the request is ACQRANGE, IDAO19SSH 
is called. 


IDAO19SH calls KSDSPROC or BLDRBAPL. 


If it is a KSDS, IDAO1LSSH calls 
KSDSPROC. 


KSDSPROC calls IDAOLORB 
The starting key index record is 


retrieved. If it is an IMBED data 
set, KSDSPROC calls IMBEDDS to 
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retrieve the ending key; otherwise, 
ee is called. The RBA pair is 
u ; 


If it is an RRDS or ESDS, IDA019SH 
calls BLDRBAPL. 


BLDRBAPL converts RRNs to RBAs and 
builds the RBA pair list for RRDSs 
and ESDSs. 

IDAO19SH calls IDAMSSIF 

IDAMSSIF is called to issue SVC 109 


route code 6 to acquire the data 
cylinders corrasponding to the RBAs. 
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BUILD A NEW CONTROL BLOC 


AGRAM CA. GENCB: 
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Notes for Diagram CA 


¢ 1 rpa019cl1 


C 


The GENCB macro is issued to create 
an ACB, RPL, or EXLST dynamically. 
If storage must be obtained for an 
RPL or EXLST and the caller's 
addressing mode (AMODE) is 31, these 
control blocks will reside above 16 
megabytes. However, the ACB resides 
below 16 megabytes regardless of the 
caller's addressing mode. 


2-5 The ACB and RPL are fixed-length 
control blocks, but the EXLST is 
variable-length. The control block 
manipulation routine calculates the 
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11 


amount of space needed for the 
control block and any copies the 
user requested. The control block 
manipulation routine tssues a 
GETMAIN macro to obtain the required 
virtual storage for any block for 
which a user area is not provided. 


The block is initialized to its 
default values. Information is 
subsequently added to the block as 
specified by the element argument 
control entries CACEs). 


The exit attribute flags indicate 
that an exit address is present, 
active, inactive, or set during 
link-edit. 
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Notes for Diagram CBl 


Cc 1 


C 
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IDA019C1 


The MODCB, SHOWCB, and TESTCB macros 
are issued to modify, display, and 
test, respectively, the ACB, RPL, 
and EXLST control blocks in the 
user's address space. 
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Notes for Diagram CB2 
4-13 
rpc0i9cl 


The field attribute table entry 
contains the length, offset from the 
beginning of the block, and 
characteristics of the field in the 
control block. 


Three types of entries are 
identified in the field attribute 
table: bitstring, normal, and 
entries that require a spacial 
subroutine to process them. 
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If the entry is a bitstring type, 
the field attribute table points to 
a series of bit entries in the 
bitstring table that are used to 
modify the control block (MODCB), or 
are compared to a value supplied by 
the user (CTESTCB). 


If the entry is a normal type, the 
element argument control entry is 
moved into the block (MODCB), a 
character string or field is moved 
into the user's area (SHOWCB), or 
the user's argument field is 
compared with the appropriate fields 
in the block ¢TESTCB). 
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Notes for Diagram DAL 


VSAM buffer management CIDA0DLIR2Z and 
IDAODLSRY) calls the I/O manager. It 
enters module IDAMI9R3, the 
problem-stata I/0 driver (PIOD), at 
IDAO19R3. 


When buffer management calls the I/0 
manager in privileged state, IDAML9IR3 
obtains a local lock for storage 
protection. For a cross memory mode, 
IDAM1OR3S obtains the CML lock. 


2 IDAMLOR3S: SCHDSIOD 


If buffer management has called the 
I/0 manager in privileged state 
(storage protect key less than 8), 
IDAM19OR3 sets the key to 0, obtains 
a local lock, and branches directly 
to IGC121. If an error condition is 
indicated upon return from 
attempting to obtain a local lock, 
IDAM19OR3 issues ABEND 179 with 
Sa code X'046'. (See Diagram 
DA2. 


3 IDAMLORS: IDAUPAD 


If the caller has specified a UPAD 
exit and WAITX, take the user exit 
with the UPAD parameter list 

containing the reason for the exit. 


4 IDAMLORS: SCHDSIOD 


If buffer management has called the 
I/0 manager in nonprivileged state, 
IDAM19R3 sets up registers as 
required and issues SVC 121 to give 
oa to IGC1I21. (See Diagram 
DAd. 
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IDAMLORS: EOVTEST 


When End of Volume is in progress, 
it requires (for control-block 
integrity) that all IOMBs for the 
data and index AMBs be inactive. 
Thus I70 cannot be scheduled for 
this IOMB. Besides, if the current 
request from buffer management 
requires End-of-Volume processing, 
the I/0 manager must wait until End 
of Volume is finished anyway. 


If the caller has specified a UPAD 
exit and WAITX, take the user exit 
with the UPAD parameter list 

containing the reason for the exit. 


IDAMLOR3: EOVTEST calls IDAOLOSE 
CIDADRQ) 


IDADRQ waits for an indication that 
End of Volume has completed. 


IDAMLOR3: EOVTEST calls IDAOLOSE 
CIDAEOVIF ) 


As far as IGC121 is concerned, End 
of Volume is in progress as soon as 
IDAM1L9R3 calls IDAEOVIF. However, 
IDAEOVIF may not be able to start 
End of Volume immediately, since all 
IOMBs of the data and index AMBs 
must become inactive. (See Note for 
step 4 and Diagram DA2.) 


IDAMIORS: EXIT 


Buffer management reacquires control 
after the I/0 has been scheduled. 
(See Diagram DA4% for a description 
of how the I/0 manager gives control 
back to the caller after the I/O is 
completed. ) 
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Notes for Diagram DA2 


IGC121, also known as the 
supervisor-state I/0 driver (SIOD), 
makes up this phase of thea I/0 manager. 


IGC121 has a functional recovery routine 
(with entry point IDA1L2Z1F1l) that gets 
control from recovery termination 
management when an error occurs while 
IGC121 is processing. This routine 
frees pages fixed in real storage by 
IGC121, releases the local lock that 
IGC1i21 obtains for storage protection, 
and issues an SDUMP to record 
information in SYS1.DUMP. 


9 1ecl12l 
10 1IGC121: RBKEY, VALIDCBS, CHKIOMB 


IGC121 verifies that the AMB address 
in the IOMB matches a data or index 
AMB address in the AMBL chain 
identified by the JSCB. 


It verifies that the IOMB address 
given as input matches an IOMB 
address in the chain identified by 
the AMB. 


For an invalid AMB or IOMB, IGC121 
vaaee ABEND 179 with reason code 
08’. 


ll IGC121: TESTEOV 


IGC121 may already Cin a previous 
pass) have requested that IDAM1L9IR3 
call IDA019SE CIDAEOVIF). 
Volume has begun and isn't finished, 
IDAMI9RS defers the request. 


14 IGC121: CHKCPA, CHAINCPA 


The IOMB points to the first of a 
chain of BUFCs to be used for this 
request. Each BUFC points to a CPA 
re chain of CPAs identified by the 


Each CPA has two chain fields. One 
chains together each CPA associated 
with the AMB. The other is used by 
IGC121 to chain together just those 
CPAs associated with the request 
from buffer management. 


For a nonprivileged requester, 
IGC121 first checks whether each CPA 
identified by the BUFCs is on the 
chain identified by the AMB. If 
not, IGC121 issues ABEND 179 with 
reason code X'0C*. 


IGC121 then points the IOMB to the 
first CPA for the request and chains 
together the CPAs for the request. 
That is, CPAs on the AMB chain that 
aren't referenced by a BUFC for the 
request aren't chained with those 
for the request. 
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16 


17 


IGC121: WRITE, READ (which call 


CONVERT ) 


For writes and reads in a request, 
IGC121 locates EDBs Cextent 
definition blocks) and verifies that 
the data-set extents described by 
the existing EDBs cover the RBAs 
contained in the request. If an RBA 
for a BUFC is not covered by any 
EDB, VSAM End of Volume must create 
one. If IGC121 has previously asked 
IDAM19R3 to call IDAOL1OSE 
CIDAEOVIF), IGC121 indicates that 
the BUFC has been processed and that 
an RBA is invalid. The channel 
program segment for this BUFC isn't 
chained with the others (by 
IDA121A2) for the I/O supervisor. 
(See Diagram DA3.) 


IGC121: BLDVPL 


Tha VPL Cvirtual page list) for a 
request may already have been built 
before IGC121 was entered. A VPL is 
a list of virtual addresses. It has 
one entry for each physical record 
of 2048 bytes or less to be 
contained in the buffer (a buffer 
contains the contents of a control 
interval); it has two entries for 
each 4096-byte physical record. 


IGC121: BLDVPL, PAGEINI1 (which 
branch to the PGFIX Routine) 


The VSL Cvirtual subarea list) is a 
parameter list to communicate to the 
PGFIX routine the virtual addresses 
of buffers to be fixed in real 
storage. (It is also called a 
PFLl—~~-page fix list.) It contains a 
beginning and ending virtual address 
for each buffer. 


To bring each page into real storage 
for fixing, IGC121 executes a TM 
(Test under Mask) instruction to 
reference each part of storage 
1 el by the entries in the 

S. 


IGC121 passes to the PGFIX routine 
the address of the VSL. Upon return 
from PGFIX, if all pages haven't 
been brought into real storage for 
fixing, IGC121 executes the TM 
instruction again and continues 
(without branching to PGFIX again> 
as PGFIX saves requests for page 
fixing). 


If the PGFIX routine indicates that 
an error occurred, IGC121 issues 
ABEND 179 with reason code X'10'. 


After pages are fixed, IGC121 
indicates in the IOMB that they were 
fixed by IGC121 for VSAM record 
management. The end appendages use 
this indication to free the pages 
after the request is completed. 

(See Diagram DA4.) 
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Buffers may already be fixed and the 
PGFIX routine not needed. 


IGC121: BLDIDAL calls PAGEOUT (which 
branches to the PGFREE Routine) 


Each virtual address in the VPLs is 
translated to a real address with 
the LRA instruction. If the real 
address cannot be found, IGC121 
branches to the PGFREE routine to 
free pages it has caused to be fixed 
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in real storage and issues ABEND 179 
with reason code X'14' 


If no BUFC has associated with it a 
valid write or read channel program 
segment, IGC121 returns to IDAMI9IRS. 
19 Deleted. 
20 IGC121: CALLABP calls IDA1L2Z1A2 


See Diagram DA3. 
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Notes for Diagram DA3 


IDA12Z1A2, 
CABP), makes up this phase of the I/0 
manager. 
RBAs to device addresses, 


the actual block processor 


It converts input and output 
completes the 


channel program segments, and chains 
them together to form a channel program 
that the I/0 supervisor schedules to do 
the I/0 operations that IDA121A2 is 
passing on from the requester. 


A request to gain access to the contents 


of a control 


interval has been 


translated to a channel program that 
gains access to physical records (that 


1S», 


to "actual blocks"). 


The request originated in either VSAM 
record management or auxiliary storage 


management. 


IDA121A2 gets control from 


VSAM by way of IDAMI19R3 and IGC121. 
From the auxiliary storage manager, it 
gets control directly. 


IDA121A2 has a functional recovery 
routine (with entry point IDA121F2) that 
gets control from recovery termination 
management when an error occurs while 


IDA121A2 is processing. 


This routine 


frees pages fixed in real storage by 


IGCi2i, 


releases the local lock that 


IDA121A2 obtains for storage protection, 
and issues an SDUMP to record 
information in SYS1.DUMP. 


22 


23 


( * 
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IDA1L21A2: CPGEN 


Three I/0 cperations may be 


associated with a BUFC: write, 
write-check, and read. They may be 
combined in five ways: write, write 


with write-check, read, write and 
read, and write with write-check and 
read. 


IDAL2Z1A2: WRITE, DOWRITE, FMTWRITE, 
CCNGEN (which call CONVERT) 


In order to connect a processing 
program with the actual data 
recorded on direct-access storage 
devices, extent definitions blocks 
CEDBs) must be created to describe 
storage areas. AS areas are filled, 
VSAM End of Volume must create a new 
EDB to describe the next area to 
receive data. 


If the appropriate EDB for RBA 
conversion is not available, 
IDA1L21A2 indicates the fact in the 
BUFC and bypasses processing the 
channel program segment. 


IDA121A2 completes a write-format or 
a write~update channel program 
segment and a write-~check segment, 
as indicated in the BUFC. 

IDA12Z1A2: READT 


Sea Note to step 22. 
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26 


27 


28 


IDA12Z1A2: READT, DOREAD (which call 


CONVERT ) 


See Note to step 23. VSAM End of 
Volume must create an EDB to 
describe an area on a new volume 
when requests reference data on 
volumes whose extents were not 
previously described. 


If the appropriate EDB for RBA 
conversion isn't available, IDA121A2 
indicates the fact in the BUFC and 
bypasses processing the channel 
program segment. 


IDA121A2 completes a read channel 
program segment. 


IDA1L21A2 


If the auxiliary storage manager is 
the requester, IDAIL2ZI1A2 builds an 
indirect data-address list (CIDAL) 
for each CPA. Each IDAL has only a 
beginning and an ending buffer 
address, since, for auxiliary 
storage management, buffer size is 
equal to 2048. (Compare with Notes 
for steps 16 through 18.) 


In the last BUFC, the pointer to the 
next BUFC points to the first BUFC 
processed. If no channel program 
segments have been built (no 
appropriate EDBs for conversion), 
IDA121A2 returns to the caller. 


IDA1Z1A2: CHAIN, PASS1, PASS2, PASS3 
(which call SETSECTR which branches 
to IECSCR1L) 


IDA121A2 first locates the first CPA 
that has a valid channel program 
segment and, if the CPA indicates 
the request is for a device with 
RPS, prepares it for rotational 
position sensing. 


If no CPA with a valid channel 
program segment is found, IDA121A2 
returns to the caller. 


Each CPA may have l, 2, or 3 channel 
program segments. IDA121A2 chains 
segments together by passing through 
the CPAs first to connect the first 
segments in each CPA, then to 
connect the second segments (Cif 
any), and finally the third segments 
Cif any). 


Segments whose CPAs have been 
invalidated (such as by no 
appropriate EDBs having been found) 
are omitted from the chain. 


IDA1L2Z1A2: STARTIOX calls PAGEOUT 


All addresses in the channel program 
are converted as required: data 
addresses, chain addresses, TIC 
addresses. Addresses converted may 
be virtual addresses or incorrect 
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real addresses. Conversion is done 
by adding positive or negative 
offsets between virtual and real 
addresses or between incorrect and 
correct real addresses. 


The channel program segments in the 
channel program may be in different 
pages of real storage. To chain the 
CCW of one segment to the CCW of the 
next segment, IDA121A2 converts 
addresses using the LRA instruction 
Cload real address). 


IDA12Z21A2 puts information in the 
IOSB so the I/0 supervisor can 
control the channel program 
execution. 


If any conversion of virtual to real 
addresses fails (LRA instruction), 
IDA1L2Z1A2 issues ABEND 179 with 
reason code X'18!'. 


IDAI2Z1A2 


If the caller has specified a UPAD 
exit and WAITX, take the user exit 
with a parameter list containing the 
reason for the exit. 
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IDALZ1A2 calls Basic I/O supervisor 
(via STARTIO) 


Befora issuing the STARTIO for a 
request from a caller not in 
supervisor state, IDA1L2A2 changes 
the caller's key to 0 (zero) (CIOSB 
IOSCKY field), to be able to store 
information in the CPA. 


The I/0 supervisor schedules the I/0 
and returns immediately to IDAIL2Z1A2. 
After the I/0 is finished, an end 
appendage gets control. (See 
Diagram DA4.) 


IDAIZ1A2 sets up the address of its 
routine ABPTERM to get control from 
the I/0 supervisor in case an error 
occurs before an end appendage has 
got control. ABPTERM turns on the 
completion bit and error bits in the 
first BUFC and returns to the 
caller. 


IDA1L2Z1A2 


At this return, I70 is not finished 
Cit may not even be started yet). 
The caller gets control back to 
manage the use of the time until the 
I70 is completed. 
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Notes for Diagram DA4% 


The VSAM normal end appendage is 
IDA121A3. It has a functional recovery 
routine Cwith entry point IDA121F3) that 
gets control from recovery termination 
management when an error occurs while 
IDA121A3 is processing. This routine 
essentially duplicates IDA121A3's 
processing. It determines what IDAIL2Z1A3 
wasn't able to do and carries out the 
task, in order to complete the normal 
end function if possible. 


This functional racovery routine also 
has its own functional recovery routine 
CF3FRR) that gets control from recovery 
termination management when an error 
occurs while IDA121F3 is processing. It 
frees pages fixed in real storage by 
ICG121 and issues an SDUMP to record in 
SYS1.DUMP information in the system 
queue area, the private service area, 
the GTF trace tables, the common service 
area, and pages in the private area of 
the address space, including the local 
system queue area and the scheduler work 
area, 


31 IECVPST 


The end appendages get control from 
the I/0 supervisor post status 
routine. 


32 IDALZ1A3 


Use SMFIOCNT to save the I/0 count 
and I/0 connect time if the address 
space jis the same as the one used 
for the OPEN. If the I/0 was 
scheduled from a different storage 
or was a catalog request, save the 
I/0 count for the address space. 
I70 issued by SRB mode or 
cross~memory mode callers is not 
counted. 


BUFCs in error Cor BUFCs whose CPAs 


were in error) have already had bits 
get by IGC121 or IDAI2Z1A2. 


LY26-3907-1 © Copyright IBM Corp. 


1974,1985 


34 


35 


39 


40 


IDALZLAS branches to IECVQCNT 


IECVQCNT decrements the count of 
requests yet to complete. An end 
appendage can have control during a 
purge only for a quiesce operation, 
in which case requests are allowed 
to complete in usual fashion, but 
without new requests being allowed. 
When the count has been decremented 
to zero, the purge can be completed. 
IDALZLAS3 


If there is an "address to which to 
return™ in the IOMB, then the 
auxiliary storage manager called the 
I/O manager Centering at IDA121A2). 
This address is put into the IOSB. 


IDAL2Z1A3 


If the user has specified a UPAD 
exit and WAITX, take the user exit 
and pass the UPAD parameter list 
containing the ECB address. On 
return from the user exit, if the 
caller has not posted the ECB, the 
caller would branch to the POST 
routine. 


IDAL2Z1A3 


If I6C121 determined that End of 
Volume should be called, IDAO19SE 
CIDAEOVIF) may have had to wait to 
give control to End of Volume, 
because, for control-block 
integrity, all the IOMBs associated 
with the data AMB and the index AMB 
must be allowed to become inactive 
before End of Volume executes. (See 
Note for step 4.) IDAEOVIF is given 
control by way of IDA121A5 to test 
whether End of Volume can be 
executed vet. (See step 50.) 


IDALZLA3: SCHDASYN branches to the 
Stage It Exit Effector 
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Notes for Diagram DAS 


The VSAM abnormal end appendage is 
IDALZ1A4¢. It has a functional recovery 
routine (with entry point IDAIL21F4) that 
gets control from recovery termination 
management when an error occurs while 
IDAL2Z21A4% is processing. This routine 
frees pages that were fixed in real 
storage by IGC121 and issues an SDUMP to 
record information in SY51.DUMP. It 
issues ABEND 279 with reason code X'04! 
if there was an invalid BUFC——one whose 
originally assigned virtual storage no 
longer belongs to the user. 


43 IDA121A¢: NONPERM calls LOCATECP, 
CHGEPTRS 


For a correctable error, IDA1I21A4 
finds the channel program segment at 
which the error occurred and sets 
the IOSB to begin the retry 
operation at that channel program 
segment. 


IDA121A4 


Use SMFIOCNT to save the I/0 count 
and I/0 connect time if the address 
space is the same as the one used 
for the OPEN. If the I/0 was 
scheduled from a different storage 
or was a catalog request, save the 
I/O count for the address space. 
I/0 issued by SRB mode or 
cross-~memory mode callers is not 
counted. 


IDALZ1A4%: PERMERR, ERRPROC (which 
call LOCATECP, CHGEPTRS) 
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48 


50 


An asynchronous request with error 
code X'41' or X'44' can be Cif it 
hasn't already been) retried on a 
device whose volume can be demounted 
and mounted at another location. 
(This is called "dynamic device 
reconfiguration. "™) 


IDA121A4$: SETBITS 


Request bits in a BUFC are turned 
off to indicate specific I/0 
requests were carried out. The 
complete bit is turned on if all 
requests were carried out. 


If a protection check occurred 
during I70, IDAI21A4¢ issues an ABEND 
279 with reason code X'14¢' 


The VSAM asynchronous routine is 
IDAI21A5. 


IDAL2Z1A5 branches to IECVQCNT 


For asynchronous requests, the end 
appendages don't decrement the count 
of requests not yet completed. They 
leave it to IDA121A5. (See Note for 
step 34.) 


IDA121A5 


If none of the PLHs indicates that 
End of Volume 1s waiting to be able 
to process, return to the caller. 
If one of them does, branching to 
the address indicated in this PLH 
(step 51) gets to End of Volume. 
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ROGRAM OR TIO 
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VSAM program listings contain the details of VSAM'’'s 
documentation. You get into the listings from the method of 
operation diagrams. Once you have located the module or routine 
name that interests you in the diagrams, you are ready to turn 
to the listing to find the additional information you require. 


0 OLOGS 


Each VSAM module listing begins with a description of the 
module, called the module prolog. 


The information contained in the VSAM module prolog is described 
in the topics that follow. 


Module name: The external procedure name of the module (for 
example, IFGO192A). 


Descriptive name: The full, descriptive name of the module (for 
example, VSAM Open). 


Status: The version and release level of the module. 


Function: A brief step-by-step explanation of the functions 
performed by this module. Function is divided into steps so 
hs you may more easily locate the routine responsible for each 
step. 


Note: <A generalized heading that includes (1) any dependencies, 

for example, processor model or features, that will affect the 
operation of this module, (2) any restrictions that apply to 

this module, (3) symbols used to represent registers and | | 
register usage, (4) symbolic name of the maintenance area for 

this module and whether the maintenance area is used or 

reserved, and (5) any special terms and acronyms that are used 

within this module that are not necessarily used elsewhere in 

the documentation. 


Module type: A description of the type of this module (for 
example, procedure or macro), the name of the compiler 
used/required to create this module, the amount of storage 
required by this module for executable code and associated data, 
and the attributes of the module (for example, reentrant or 
read-only). 


Entry point: The name of the point at which control can enter 
this module, the conditions of entry, the calling sequence by 
which control was given, including any parameters passed and the 
names of modules that may enter at this entry point. 


Input: <A description of anything this module gets or 
references, for example, registers, control blocks, and data. 
The means by which this module gains access to the input is 
included. 


Output: <A description of registers, control blocks, and data 
areas at output; any messages issued as a result of this 
module's processing are included. 


Exit-normal: <A description of conditions at and reasons for 
normal exit from this module, including the names of modules 
called by this module. 


Exit-error: <A description of conditions at and reasons for any 
error exit from this module. ) 


External references: A list of modules, data areas, etc., 
defined outside of or accessible outside of this module. 


204 MYVS/XA VSAM Logic LY26-3907-1 © Copyright IBM Corp. 1974,1985 


C 


C 


Restricted Materials of IBM 
Licensed Materials —~ Property of IBM 


Tables: A list of all local tables and work areas, that is, 
data areas built and used only within this module. 


Macros: A description of system macros used by this module. 


Change activity: A list of any change activity to this module. 


MODULE FLOW COMPENDIUMS 


READING PROGRAM ORGANIZATION COMPENDIUMS 


Program organization compendiums are descriptions of VSAM 
functions, in terms of module (procedure) calls and usage. The 
compendium and descriptive notes, keyed to the compendium, are 
on the same page whenever possible, or on facing pages. 


The compendium shows the flow of control between VSAM modules in 
order to perform a VSAM function. Figure 5 shows a typical 
compendium figure. A single~headed arrow (between IGCQO001LI and 
IFGO193A) indicates that control is passed from one module to 
another and does not return. A double-headed arrow indicates 
that control is returned when the "called" module completes its 
processing. 


Blocks that are indented Cotherwise contained within another 
block) are called to perform a specified function and return, 
when finished, to the caller. 


For example, IDAO0192A calls IDA0192C to retriave information 
from the catalog. 


Numbers and letters in boldface type refer to descriptive notes. 


The notes tell what the caller expects the called module 
(procedure) to do. 


OPIN 


SVC 19 I1GC00011 
IGOL92A 
Parameter 2 [IDAOL92A* 


List 


3 IDAOL92C 


4 IDA0192F* 








S IDA0192V 







6 [DA0192D 


7 IDAO192C 


Figure 5. Typical Program Organization Compendium Figure 
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DATA-SET MANAGEMENT COMPENDIUMS 





OPEN 


Figure 7 

Open a VSAM 
Cluster (from 
an ISAM-User’s 
Program) 


Figure 8 

Open a VSAM 
Cluster (from 
a VSAM-User’s 
Program) 


CLOSE (TYPE = T) 


Figure 14 
Temporary Close 
(TYPE=T) of 

a VSAM Cluster 


Checkpoint 





Figure 9 
Open a 
Catalog (from 
the 
Scheduler) 


Figure 10 
Add a String 
Dynamically 





Figure 17 


Checkpoint 
Processing 





Verify Data Space 


Verify a Non-VSAM 
Caller’s Authorization 
to Process Each Data 
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CLOSE 
















Figure 11 Figure 13 








Close a VSAM Close a 
Cluster (from Catalog (from 
an ISAM-User’s the 


Program) Scheduler) 






Figure 12 
Close a VSAM 
Cluster (from 

a VSAM-User’s 
Program) 







BLDVRP/DLVRP 


Figure 16 
Build or 
Delete a 


VSAM 
Resource Pool 





Figure 18 
Restart 
Processing 


Figure 6. Data Set Management Program Organization Contents 
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OPEN 
SVC 19 


Open 
Purameter 
List 





Return 
to 
Caller 


Figure 7. 








1 I[FGO196V 





3 IDA0192I 
@ Issues SVC 19 


See Figure 8 


IFGO198N 


Open a VSAM Cluster (from an ISAM-User's Program) 





Notes for Figure 7 


1 IGCO001I, IFGO196V, and IFGOL98N are 
ren nocd ss (for ae see 
Open/Close/E0V Logic). 
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IFGO192I is an alias-name for 
IFGOL92A. 


IDA0192I is the ISAM-interface: Open 


module. It is an alias for 
IDA0192A. 
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Parameter 
List 





OPEN 
SVC 19 


® 


Return 


to 
Culler 
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1 IFGOI93A 








3 IDA0I92C€ 


7 IDA0192C 


§ IDAVI928 
9 IDAOI92C 


9A 1IDAO192X 


10 IDAOI92Z°* 











10A IDAOI92L 





18 1/0 
Support 

Recovery 

Routine 





IFGOL9EN 


Note: ° indicates thut the module culls 1DAO192M for virtual sturuge. 
IDAQ192M is the VSAM Virtuul-Storage Manager. 


Figure 8. 
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12 IDAOI92W* 


Open a VSAM Cluster (from a VSAM-User's Program) 
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Notes for Figure 8 


1 IGCOOCO1I, IFGOL93A, and IFGO198N 
are Open modules Cfor details, 


see Open/Close/EQV Logic). 


A IFGO191Y Cin Figure 9 on 
Page 210) XCTLs to IFGO1LI3SA to 
open a catalog. Open-processing 
and return~to-the-caller 
continues as shown in this 


figure. 

2 IDAO0L92A is the VSAM Open module. 
It builds the BIB, WSHD, and 
dummy DEB. 

3 IDA0192C calls catalog management 


CLOCATE) to retrieve information 
about the VSAM object being 
opened from its catalog rececrd. 


& IDAO192F opens base, path, and 
upgrade clusters. It builds the 
ane AMBL, CMB, UPT, VAT, and 
VMT. 


5 IDA0192V ensures that the 
required minimum number of the 
object's direct-access volumes 
are mounted. 


6 If the data set is stored on a 
mass storage volume, IDA0192D 
stages (via a Mass Storage System 
ACQUIRE) the data set to a 
direct-~access storage device. 


IDA0192C checks the time stamp. 
IDA0192B opens VSAM clusters. 


IDA0192C calls catalog management 
(LOCATE) to retrieve volume 
serial numbers from the object's 
catalog record. 


9A IDAO0192X Cinvoked when opening 
VSAM data sets cataloged in a ICF 
catalog or VVDSs) calls VSAM 
volume data set (VVDS) manager to 


C 
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ll 


12 


1OA 
13 


14 


15 
16 
17 


18-19 


20-21 


obtain data set characteristics 
and extend information. 


IDA0192Z builds the following 
control blocks: 


AMB DEB IWA 
AMBXN EDB LPMB 
AMDSB IQE MMIB 
ARDB IRB 
IDA0192Y builds the: 

BUFC IOSB SRB 
Buffers PLH WAX 
IOMB RPL 


IDA0192W builds the CPA control 
block. 


IDA192L preformats a page space. 


If the data set is stored on a 
mass storage volume, IDA0192D 
stages (via a Mass Storage System 
ACQUIRE) the data set to a 
direct~-access storage device. 


Whenever a VSAM Open module 
detects an error, IDA0192P issues 
a diagnostic message and traces 
VSAM control blocks if the 
Generalized Trace Facility (GTF) 
is active. 


Same as step 14. 
Same as step 14. 


ppptaes writes SMF Pecord type 


IDAOCEA1 runs as an ESTAE exit 
routine when an error occurs in 
Open. It logs system information 
and returns to the I/0 support 
recovery routine to continue with 
termination. 


IDAOCEA2 locates and frees 
storage used for VSAM data sets 
in the system queue area and the 
common service area. 
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OPEN 


SVC 19 1 I1GCOOOII 


2 





IFGO191X 







2 IFGOISIY 





tCutalog's 
ACB 





Figure 9. Open a Catalog (from the Scheduler) 





Notes for Figure 9 2 IFGO191X and IFGO19LY are catalog 
Open: ACB processing modules. These 
1 IGCOO001I is an Open module. modules perform special processing 


for the catalog's ACB, then transfer 
control Cusing the XCTL macro) to 
IFGOL93SA Cin Figure 8 on page 208). 


2 
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1 IGCOOOLI 
BLDVRP/DLVRP oe 
SVC 19 2 IFGO192Y 
3 IDAO192Y 
4 IDA0192M 
§ IDAOI92W 
6 IDA0192M 

Return 
to 
Caller 





7 Recovery 
Termination 
Manager 






8 IDAOCEA4 


9IDAOCEA! 


Figure 10. Adda String Dynamically 


J 
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IGCO001I determines whether SVC 19 
was issued for a VSAM ACB (subtype 
X'11"'). %It obtains a pseudo 
FORCORE: base prefix, extended 
prefix, WTG, RPL, and work area. 
The visual ID is 'VRP’*. 


IFGO19Z2Y is the second entry point 
in CSECT IFGO192A in load module 
IFGOL92ZA. It: 


e Sets audit-trail information in 
FORCORE 


® Ensures that the key of the 
parameter list is the caller's 
key, which IFGO192Y uses for 
processing 


e Establishes DXVKEY, DXUDCBAD, 
and DXPDCBAB 


® Moves the BLDVRP parameter list 
Cwhich appears to be an ACB with 
subtype X'11') to protected 
storage 


e Establishes ESTAE CIDAOCEA4) in 
case an error occurs in 
subsequent processing 


When IFGO192Y receives control back 
from IDAOD192Y, it: 


® Cancels the ESTAE 


e Frees the pseudo FORCORE (with 
IECRES macro) 


IDA0192Y builds control blocks to 
add a string for record management 
processing. It: 


° Enqueues busy on the data seat to 
prevent concurrent data-set 
management requests (OPEN, 
CLOSE, CLOSECTYPE=T)) 


® Builds string blocks for tha 
data AMB: BUFC, PLH/IOMBXN, 
IOMB/IQE, SRB/IOSB/PFL, CPA 
Cand, for a path, RPL/WAX) 


° For a key~sequenced data set, 
builds string blocks for the 
index AMB: BUFC, CPA 


e Adjusts the string count in the 
CMB for the data set 


° Chains string blocks (with 
SWap/ Save) 


IDA0192M allocates virtual storage 
for IDA0192Y to use to build control 
blocks. 


IDAOQ192W builds required channel 
programs and CPAs. 


Same as step 4. 


The recovery termination manager 
gets control when an error occurs in 
the control program. 


IDAOCEA4 is the BLDVRP/DLVRP ESTAE 
routine. 


IDAOCEA1 is the data-set management 


recovery routine for error 
recording. 
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CLOSE ) 
SVC 20 IGC00020 J 
1 IFGO200V 








3 IDA0200S 
@ Issues SVC 20 


See Figure 12 


4 1/O 
Support 

Recovery 

Routine 


5 IDAOCEAI 







Close 
Parameter 
List 












6 IDAICIAL 


Return 
to IFGO202L 


Caller 
Figure 11. Close a VSAM Cluster (from an ISAM-User's Program) 





Notes for Figure ll 3 IDA0200S is the ISAM-interface 
Close module. It is an alias for 
1 IGC00020, IFGO200V, and IFGO0202L IDA0192A. 
are Close modules (for details, see 
OQpen’Close/EQV Logic). 46-6 The I/0 support recovery routine is 
an ESTAE routine. IDAOCEA1 is the 
2 IFGO200S is an alias-name for VSAM ESTAE routine, and IDAICIAI1 is 
IFGO192ZA. the ISAM-interface ESTAE routine. 


IDAICIA1 frees ISAM-interface work 
areas and records information in 
SYS1.DUMP or the SYSABEND data set. 


J 
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CLOSE ) 






3 IDA0200T 


4 IDAOISRI 


5S IDA0200B 


6 IDA0192Y 


7 IDA0192C 
® Issues SVC 26 






Close 
Parameter 
List 









See Catalog 
Diagnosis 
Reference 






8 IDA0192S 
9 IDA0192D 
10 IDAO192P 


12 1DAQ192P 


13 1/0 Support 
Recovery 
Routine 





IFGO202L 


Figure 12. Close a VSAM Cluster (from a VSAM-User's Program) 
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Notes for Figure 12 


1 


LY26~-5907~1 


IGC00020, IFGO200V, and IFG0202L 
ara Close modulas (for details, 


see Open/Close/EOV Logis). 


IFGOZ00N Cin Figure 13 on 

page 218) XCTLs to IFGO200V to 
close a catalog or catalog 
recovery area. Close-processing 
and return-to-the-caller continue 
as shown in this figure. 


IFGO0200T is an alias~name for 
IFGO192A. 


IDA02Z00T is the VSAM Close 
module. It frees control blocks. 


For an output data set, IDAD200T 
issues an ENDREQ macro for VSAM 
to write out buffers and finish 
I/70 for the data set. (See 
Figure 31 on page 258.) 


IDAO0200B closes VSAM clusters. 


IDA0192Y builds control blocks 
for the WRTIBFR macro, when record 
management indicates they are 
needed. The storage obtained for 
the control blocks is fread by 
Close. 


IDAG192C calls catalog management 
CUPDATE) to modify statistical 
information in the object's 
catalog record. 


10 


il 


12 


13-14 


15-16 


© Copyright IBM Corp. 1974,1985 


IDA01925 writes SMF record(s) 
type 64. 


If the data set is stored on a 
mass storage volume, IDA0192D 
destages (via a Mass Storage 
System RELINQUISH) the data set 
from direct-access storage to 
mass storage. 


Whenever IDA0N2Z00B detects an 
error, IDA0192P issues a 
diagnostic message. 


When a catalog is being closed, 
IDA0192C calls catalog management 
CLOCATE) to indicate that Close 
has finished. 


IDA0N192P issues a diagnostic 
message whenever IDA02Z00T detects 
an error. 


IDAOCEAI runs as an ESTAE exit 
when an error occurs in Open. It 
logs system information and 
raturns to the I/0 support 
racovery routine to continue with 
termination. 


IDAOCEA2 locates and frees 
storage used for VSAM data sets 
in the system queue area and the 
common service area. 
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CLOSE 
SVC 20 


J 






1 1GC00020 





tCatalog's 
ACB 





Figure 13. Close a Catalog (from the Scheduler) 


IFGOZ00N is the catalog Close: ACB 
processing module. It performs 
special procassing for the catalog's 
. ACB, then XCTLs to IFGO200V Cin 
Figure 12 on page 216). 


Notes for Figure 13 2 


1 16000020 is a Close module (for 
details, see / 


J 
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Temporary 
CLOSE 1 IGC0002C 


SVC 23 
RI 2 IFGO231T 
3 IDA0231T 
4 IDA019R1 








§ IDA0231B 


6 IDA0192Y 
7 IDA0192D 


8 IDA0192C 
e Issues SVC 26 





Close 
Parameter 
List 






See Catalog 
Diagnosis 
Reference 







9 IDA0192S J 
10 IDA0192P 


11 IDA0192P 


Return 
to IFG0232Z 


Caller 


Figure 14. Temporary Close (TYPE=T) of a VSAM Cluster 
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Notes for Figure 14 


1 IGCO002C and IFGO0232Z are 
temporary-Close modules (for 


details, see Open/Close/EOV Logic). 


2 IFGO231T is an alias-name for 
IFGOLIZA. 


3 IDA0231T is the VSAM temporary-Close 
module. 


q For an output data set, IDA0231T 
issues an ENDRE@Q macro for VSAM to 
write out buffers and finish I/0 for 
the data set. (See Figure 31 on 
page 258.) 


5 IDA0231B is the VSAM Close C(TYPE=T) 
module for closing clusters. 


6 IDA0192Y builds control blocks for 
the WRIBFR macro, when record 
management indicates they are 
needed. The storage obtained for 
the control blocks is freed by 
Close. 
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If the data set is stored on a mass 
storage volume and is defined with 
the DESTAGEWAIT attribute, IDA0192D 
destages (via a Mass Storage System 
RELINQUISH) the data set from 
direct-access storage to mass 
storage and waits until destaging is 
completed. If the data set was not 
bound in direct-access storage, 
IDA0192D restages (via a Mass 
Storage System ACQUIRE) the data set 
from mass storage to direct-access 
storage. 


IDAOD192C calls catalog management 
CUPDATE) to modify statistical 
information in the object's catalog 
record. 


IDA0192S writes SMF record(s) type 
64. 


Whenever IDA0231B detects an error, 
IDA0192P issues a diagnostic 
message. 


IDA0192P issues a diagnostic massage 
whenever IDA0231T detects an error. 
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Catalog 
Management 
Issues SVC 29 
SCRATCH 


DADSM 
Determines 
Data Space 


is Protected 


1 SECLOADA 





Figure 15. 
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Non-VSAM 
Caller 
Issues SVC 19, 
OPEN; 

SVC 20, CLOSE; 
or SVC 55, 
End of Volume 


4 IDA0192G 


§ IDA0192C 
e Issues SVC 26 
GENDSP 













See Catalog 
Diagnosis 
Reference 










6 IDA0192C 
@ Issues SVC 26 
LOCATE 






See Catalog 
Diagnosis 
Reference 






Verify a Non-VSAM Caller's Authorization to Process 
Each Data Set in a VSAM Data Space 
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Notes for Figure 15 


The VTOC contains a format-l 
Cidentifier) DSCB to describe each VSAM 
data space. The DSCB indicates that the 
space it describes is protected and that 
the caller must provide the correct 
password before access is granted. 


When a VSAM data space is shared 
Cnonunique), the caller must provide the 
correct master password for each data 
set in the data space before being 
allowed to process the data Space. 


1 When the caller is the DADSM scratch 
routine and the format-l aha 
identifies a VSAM data spa 
SECLOADA passes control to “TDA01926. 
(For SECLOADA details, see 
Open/Clase/EOV Logic.) 


2 When the caller is authorized Cis in 
key 0 and supervisor state), 
IDA0192G does no further checking. 
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When a utility program issues OPEN, 
CLOSE, or the SVC for End of Volume, 
IFGO195T determines that the caller 
is other than VSAM or ISAM interface 
and that the format~I1 DSCB is 
protected. (For details, see 


Open/Close/EQV Logic.) 


IDA0192G verifies the caller's 
authorization to process the data 
space. 


IDA0192C issues SVC 26 (GENDSP) to 
catalog management to obtain the 
DSNAME of each VSAM data set in the 
data space. 


IDA0192C issues SVC 26 (LOCATE) to 
cause catalog management to verify 
that the caller can supply each 
protected date set's master 
password. 
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BLDVRP 
or 
DLVRP 
SVC 19 


J 






3 IDA0192Y 





4 IDA0192M 







Return to Caller 





User's 
Parameter 
List 





§ Recovery 
Termination 
Manager 


6 IDAOCEA4 


7 IDAOCEAI1 








Figure 16. Build or Delete a VSAM Resource Pool 
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Notes for Figure 16 


l IGC0001I determines whether SVC 19 
was issued for a VSAM ACB (subtype 
X'11"') and determines whether SVC 19 
is for BLDVRP or DLVRP. It obtains 
a pseudo FORCORE: base prefix, 
extended prefix, WTG, RPL, and work 
area. The visual ID is ‘VRP*. 


2 IFGO192Y is the second entry point 
in CSECT IFG0192A in load module 
IFGO1L92ZA. It: 


® Sets audit-trail information in 
FORCORE 


® Ensures that the key of the 
parameter list is the caller's 
key, which IFGO192Y uses for 
processing 


e Establishes DXVKEY, DXUDCBAD, 
and DXPDCBAB 


e Moves the BLDVRP parameter list 
(which appears to be an ACB with 
subtype X'11') to protected 
storage 


e Establishes ESTAE (CIDAOCEAS4) in 


case an error occurs in 
subsequent processing 
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When IFG0192Y receives control back 
from IDA0I192Y, it: 


e Cancels the ESTAE 


e Frees the pseudo FORCORE (with 
IECRES macro) 


IDA0192Y does validity checking and 
builds or deletes control blocks for 
a VSAM global (GSR) or local CLSR) 
resource pool: VSRT, WSHD, CPA 
header, PLHs, BSPH, BUFCs, buffers. 
For BLDVRP, it chains the VSRT to 
the VAT; for DLVRP, it unchains it. 
It uses a pseudo FORCORE, an ACB 
work area CIDAOPWRK), and a copy of 
the BLDVRP parameter list in 
protected storage. 


IDA0192M allocates virtual storage 
te pennies to use to build control 
ocks. 


The recovery termination manager 
gets control when an error occurs in 
the control program. 


IDAOCEAS is the BLDVRP/DLVRP ESTAE 
routine. 


IDAOCEA1 is the data~set management 


recovery routine for error 
recording. 


Program Organization 225 


CHKPT 
SVC 63 


Return 
to Caller 


Notes for Figure 17 


1-4 


IGC0006C, IGC0206C, IGCONO6C, and 
IGCOS06C are checkpoint modules, 
described in Checkpoint/Restart 


° 


IDAOCO6C is the VSAM checkpoint 
module. It saves information 
required by restart in VCRCORE. 


IDACKRA1 is the VSAM 
checkpoint/restart ESTAE routine. 
It provides problem determination 


226 MVS/XA VSAM Logic 


Restricted Materials of IBM 
Licensed Materials — Property of IBM 


1 iGco006c 









5 IDAOCOE6C 
7 
IDACI96C 





8 IDAOI96C 


9 IDACKRAI 


4  IGCOS06C 


Figure 17. Checkpoint Processing 


information and attempts to pass 
control to a retry routine. 


7 If any errors occur durin 


checkpoint processing, 


frees all VCRCORE. 


8 If a valid JSCBSHR field exists, 
IDA0196C builds an SSCR. 


VCRCORE exists, 


9 Same as step 6. 
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IEFRSTRT 
05B 
SVC 52 cal 


1 











IGCONOSB 





2 IDAOCOSB 


3 IDACKRA! 







4 IGCOTOSB 





5 IDAOA0SB* 
6 






IDA0192C 


7 1DA0192F* 







8 IDA0192V 






9 1DA0192D 






10 1pDA0192C 


Return to 


19 IGCOVOSB CHKPT Caller — 
SVC 63. 


*This module calls IDA0192M, the VSAM Virtual Storage Manager. 


Figure 18. Restart Processing 
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5 







IDAOA05B 
(Continued) 









11 [DA0192B 





12 1pA0192C 


13 [DA0192Z* 






14 1DA0192Y* 


16 [DA0192P 






17 IDACI96C 






18 IDACKRA1 
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IGCO005B and IGCONO5B are restart 
modules, described in 
Checkpoint/Restart Supervisor Call 
Logic. 


IDAOCO5B is the VSAM restart SSCR 
and DEB module. It restores the 
JSCBSHR, frees AMB DEBs, and sets 
DEBXCDCB to mark VSAM ACBs 
nonclosable. 


IDACKRA1 formats a message in the 
SDWA, executes the SDUMP macro, and 
either returns to a retry routine or 
continues with abnormal termination. 


IGCOTO5B is a restart module, 
described in Checkpoint/Restart 


Superviso all Logic. 


IDAOA05B is the VSAM restart module. 
It rebuilds VGTTs and HEBs and does 
repositioning and verify processing. 


IDA0192C obtains the relationships 
to the cluster being restarted. 


IDA0192F builds the VMTs for the 
sphere. 


For each VCRT processed, IDA0192V 
ensures that the required number of 
the cluster's direct~-access volumes 
are mounted. 


If the data set is stored on a mass 


storage volume, IDA0192D stages (via 
a Mass Storage System ACQUIRE) the 


© Copyright IBM Corp. 
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10 
ll 


12 


13 


14 


15 


16 


17 


18 
19 


data set to a direct-access storage 
device. 


IDA0192C checks the time stamp. 


IDA0192B performs volume processing 
for each AMB in the cluster and does 
share processing for the cluster. 


IDA0192C calls catalog management 

CLOCATE) to retrieve volume serial 
numbers from the cluster's catalog 
records. 


IDA0192Z refreshes AMDSBs and ARDBs 
and rebuilds DEBs and EDBs. 


IDA0192Y rebuilds SRBs, IQOSBs, and 
PFLs. 


If the data set is stored on a mass 
storage volume, IDA0192D stages (via 
a Mass Storage System ACQUIRE) the 
data set to a direct-access storage 
device. 


Whenever a VSAM Open module detects 
an error, IDA0192P issues a 
diagnostic message and traces VSAM 
control blocks if the Generalized 
Trace Facility (GTF) is active. 


IDACI96C is an external entry for 
IDA0196C and performs cleanup 
functions for VSAM 
checkpoint/restart control blocks. 


Same as step 3. 
IGCOVO5B is a restart module, 


described in Checkpoint/Restart 
Supervisor Call Logic. 
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RECORD-MANAGEMENT COMPENDIUMS (INCLUDING END OF VOLUME) 





GET (Entry-Sequenced or Key-Sequenced Data Set 

















Figure 29 


Create Time 
Sequence-set 


Record 


Processing: 
Build an Entry 


Figure 20 
GET: Direct and 
Skip Sequential 


Figure 22 
Obtain the Control Interval 





the Record in the Control 
Interval 








PUT/ERASE (Entry-Sequenced or Key-Sequenced Data Set) 


Figure 24 
PUT 
Processing 


Figure 25 
Update/Erase 
Processing 





Create Time 


Figure 26 
Obtain the Next 
Control 

Interval 


Figures 30 and 31 
Create-Time Sequernce- 
Set Record Processing: 
Write the Record 

(End of Control 

Area) 





Establish Positioning 

by Way of the Alternate 
Index and Gain Access 
to the Base Cluster 





CNVTAD (KSDS) 





Figure 


ACQRANGE (KSDS) 


Figure 42 


ACQRANGE 
Processing 


19. 


Figure 21 
GET: Sequential 
Processing 


Containing a Specified Record 
and Establish the Position of 























Figure 28 
Split a 


Control 
Area 


Upgrade Processing 


Figure 37 

Upgrade the 
Alternate Indexes 
in the Upgrade Set 


MNTACQ 


Figure 43 
MNTACQ 
Processing 


GET (Relative Recoed Data Set) 


Figure 23 
GET 


Processing 





Figure 35 
PUT/ERASE 


Processing 





Noncreate Time 


Figure 27 
Split a Control 
Interval 


Figure 33 and 34 
Update the 
Index 





Buffer Management 


Figure 38 
Regulate the 
Ownership and the 
Contents of the 
I/O Buffers 











TERMRPL 





PUT/ERASE (Relative Record Data Set) 


Figure 32 
Noncreate-Time 
Sequence-Set 
Processing 


End of Volume 


Figure 39 
VSAM End 
of Volume 


ENDREQ 
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GET 0 IDA019RO 


BALR R14, R15 
1 IDAOI9RI 


2 IDAOI9R4 





ry") 
oO 


Request 
type 


3 IDAOISRA 
(See Figure 22) 


4 IDAOI9R4 
DATARTV 





Spanned record 
§ IDAOI9ORT 
IDADARTV 











6 IDAOI9RZ 
IDAFREEB 


7 IDAOI9ORZ 
IDAGNXT 


ra) 


| 


tRPL 


ry.) 


14 


Direct GET 


8 IDAOI9R4 
RLSEBUFS 


Return 
address 


y."] 


15 
t IDA019RO 





9 IDAOI9RZ 
IDAWRBFR 





2 


> ome ee ee eee ee ee oe oe 10 IDAM19R3 
(See Figure 46) 
R15 
IDAFREEB 
Return 
to 12 IDAOI9RZ 
caller IDAIFREEB 


13 IDAOLORP 
IDATJXIT 


Figure 20. ea and Skip Sequential Processing CESDS, 
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Notes for Figure 20 


0 


LY26~-3907-1 


IDA019RO is the VSAM record 
management interface module. It 
resides below the 16-megabyte 
virtual storage line and it 
interfaces between the VSAM user and 
the VSAM record management modules 
that are located above the 
16-megabyte virtual storage line. 


IDAO19R1 is the common record 
management request module. It 
verifies that the request is a valid 
record management macro, then tests 
the RPL for keyed or addressed 
processing. 


When the request requires either 
keyed or addressed processing (not a 
control~interval-processing 
request), IDAOLSR4 selects the 
correct processing path for either 
GET, PUT, or POINT, and for 
sequential, skip sequential, or 
direct processing. 


When the request is either direct 

GET or skip sequential GET, IDAO1YIORA 
locates the position of the desired 
data record in its control interval. 


DATARTV makes an unspanned data 
record available to the caller. It 
sets the RBA of the data record into 
the RPL. If the caller's request is 
in locate mode, DATARTV returns a 
pointer to the record to the caller. 


© Copyright IBM Corp. 
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12 


13 


If the request is in move moda, 
DATARTV moves the data record into 
the caller's record area. 


IDADARTV moves all the segments of a 
spanned record into the user's area. 


IDAFREEB frees the buffer. 


IDAGNXT moves the next segment into 
a buffer. 


If the request its direct GET and the 
caller doesn't want to retain the 
record's position for subsequent 
record processing requests, RLSEBUFS 
releases the data record's buffer. 


If the buffer was changed by a 
previous update request, IDAWRBFR 
rewrites the buffer's control 
interval into the data set. 


See Figure 46 on page 292. 
IDAFREEB frees the data buffer. 


If the request is keyed, IDAFREEB 
frees the buffer containing the 
sequence set control interval 
associated with the data buffer. 


If the user's EXLST contains an 
active journal exit address, 
IDATJXIT provides the necessary 
journaling information for the 
user's journal exit routine. 
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GET 
BALR R14, R15 ———>| 0 IDAQ19RO 


IDAOIORI 




















2 IDAOISR4 


3 IDAOI9S7 
IDAUCBV 


4 IDAOI9R4 


RO 
PLHEXP 
Request 
type Addressed 







IDAOISRZ 
IDAGRB 


6 IDAO19S6 


Keyed 







RI4 IDAOISRZ 


IDAGRB 
Return 


address 


RIS 8 IDAQI9RZ 
t IDAOI9RO IDAGRB 

9 IDAQI9S6 

10 IDAOI9RZ 

IDAFREEB 











RIS 
Return IDAOIORZ 
code IDAGNXT 


IDAO19S6 


Return 
to ——_—_ 
caller 


Forward processing 


13 IDAOISR4 
ADVPLH 


14 IDAOI9RZ 
IDAFREEB 


1S IDAOISRZ 
IDAGNXT 


16 IDAO19S6 



































IDAO19R4 
(Continued) 
backward processing 





17 IDAOISRV 
IDAADVPH 





18 IDAOI9RZ 
IDAFREEB 


19 IDAOISRZ 
IDAGNXT 


20 IDA019S6 





21 IDAOISR4 
SCANDATA 





22 IDAOISRA 
(See Figure 20) 


23 IDAOIOR4 
ADVPLH 


Unspanned record 





24 IDAOISR4 
DATARTV 





25 IDAQI9SR4 
MOVEKEY 


26 IDAOI9SRP 
IDATJXIT 


Spanned record 


2? IDAOI9RT 
IDADARTV 





28 IDAOI9RZ 
IDAFREEB |. 


29 IDAOI9RZ 
IDAGNXT 





30 IDAOI9RP 


IDATIXIT 


Figure 21. GET: Sequential Processing (ESDS, KSDS) 
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Notes for Figure 21 


0 IDAOLIORO is the VSAM record 
management interface module. It 
resides below the 16-megabyte 
virtual storage line and it 
interfaces between the VSAM user and 
the VSAM record management modules 
that are located above the 
16-megabyte virtual storage line. 


l IDA019R1 is the common record 
management request module. It 
verifies that the request is a valid 
record management macro, then tests 
the RPL for keyed or addressed 
processing. 


2 When the request requires either 
keyed or addressed processing (not a 
control-interval~processing 
request), IDA019R4¢ selects the 
correct processing path for either 
GET, PUT, or POINT, and for 
sequential, skip sequential, or 
direct processing. 


3 When the data set is opened with 
DISP=SHR and SHAREOPTION(3), IDAUCBYV 
updates the control blocks. 


G When the request is sequential GET, 
PLHEXP tests the status indicators 
in the placeholder (PLH) to 
determine if the request is the 
first request after the data set is 
opened and the open does not cause 
shared use of an existing control 
block structure, and isn’t preceded 
by a POINT to position to a starting 
record. 


5 If the request is addressed, IDAGRB 
reads in the first data control 
interval of the data set. 


6 IDA019S6 is called if the CIDFBUSY 
bit has been set in the CIDF 
indicating a CI split was 
interrupted or is still in progress 
for this CI. IDA019S6 will set a 
return code and reason code in the 
RPL if the CI cannot be repaired. 


7 If the request is keyed, IDAGRB 
reads in the first sequence set 
control interval. 


8 The sequence set control interval is 
used to determine the RBA of the 
first data control interval. IDAGRB 
retrieves the first data control 
aie of the key~sequenced data 
set. 


9 See step 6. 

160 «#=If the first control interval of the 
key~sequenced data set is empty, 
IDAFREEB frees its buffer. 

11 IDAGNXT obtains the next control 


interval of the key~sequenced data 
set. Steps 10 and 11 are repeated 
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13 


14 


15 


16 
17 


18 


19 


20 


as often as necessary to obtain a 
nonempty control interval of the 
key-sequenced data set. 


See step 6. 


e If the end of data condition 
occurs, PLHEXP sets a return 
code and returns to the caller. 


e If a read error occurs, ADVPLH 
skips over the bad data, resets 
the PLH so that it points to the 
next good data control 
interval'’s RBA, and returns to 
coe caller with a return code 
set. 


® If the previous request 
encountered a read-exclusive 
error Cnot allowed to read the 
record because another user has 
exclusive control over it), 
SCANDATA searches the index to 
locate the requested record. 


If no exceptional conditions have 
been detected, the PLH now points to 
the record most recently processed 
by the user. ADVPLH adjusts the PLH 
s0 that it points to the next record 
(desired by this request) in the 
buffer. 


If there are no more records in the 
buffer (that is, the record most 
recently processed by the user is 
the control interval's last record), 
IDAFREEB frees the buffer. 


IDAGNXT retrieves the next 
sequential control interval, unless 
another buffer already contains the 
control interval. The PLH is set to 
point to the first data record in 
the control interval. 


Sea step 6. 


If no exceptional conditions have 
been detected, the PLH now points to 
the record most recently processed 
by the user. IDAADVPH adjusts the 
PLH to point to the preavious record 
(desired by this request) in the 
buffer. 


If there are no more records in the 
buffer (that is, the record last 
processed by the user is the control 
interval's first record), IDAFREEB 
frees the buffer. 


IDAGNXT retrieves the next control 
interval in descending sequence, 
unless another buffer already 
contains the control interval. The 
PLH is set to point to the last 
record in the control interval. 


See step 6. 
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If the current request is 
GET-for-update, but the record's 
buffer is not under the caller's 
exclusive control, SCANDATA locates 
the record again to ensure that the 
PLH now points to it, even though 
updates might have occurred against 
it. The buffer is now under the 
caller's exclusive control. 


IDAO1SRA searches the index, if the 
data set is key~sequenced, or uses 

the caller-supplied RBA, if the data 
set is entry-sequenced, to determine 
the record's location in the buffer. 


If the placeholder needs to be 
updated, ADVPLH updates it after the 
record has been located. 


DATARTV makes an unspanned data 
record available to the caller. It 
sets the RBA of the data record into 
the RPL. If the caller's request is 
in locate mode, DATARTV returns a 
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pointer to the record in the 
caller's RPL. If the request is in 
move mode, DATARTV moves the data 
record into the caller's record 
area. 


MOVEKEY saves the record's key in 
the placeholder. 


If the user's EXLST contains an 
active journal exit address, 
IDATJXIT provides the necessary 
journaling information for the 
user's journal exit routine. 


IDADARTV moves all the segments of a 
spanned record into the user's area. 


IDAFREEB frees the buffer. 


IDAGNXT moves the next segment into 
a buffer. 


See the Note for step 21. 
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IDAO19R4 J 


1 IDAOI9RA 


2 IDA0NI9RZ 
IDAWAIT 






3 IDAO19RB 


4 IDAOIL9RZ 
IDAGRB 


§ IDAOI9R3 


6 IDAOI9RC 
7 IDAOI9RZ 
IDAFREEB 







8 IDAO19RZ 
IDAFREEB 


9 IDADLISRW 
IDAFRBA 


10 IDA019RZ 
IDASBF 





11 IDAOI9RZ 
IDAGRB 


12 IDA019S6 


Figure 22. Obtain the Control Interval Containing a Specified 
Record and Find the Position of the Record in the 
Control Interval CESDS, KSDS) 


2 
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Notes for Figure 22 


1 IDAQ19RA locates the position of a 
desired data record in a control 
interval that is in a VSAM record 
management buffer. 


2 If the control interval is being 
updated by another user, IDAWAIT 
waits until the updating is 
complete. 


2 If the data set is key~sequenced, 
IDAO019RB searches the index to find 
the RBA of the desired data racord's 
control interval. 


4 IDAGRB obtains an index record to 
search. 


See Figure 40 on page 280. 


IDAQ19ORC searches the index control 
interval to locate an index entry 
containing a key value aqual to or 
greater than the search argument 
passed by IDA019RB. IDAQ19RC sets a 
return coda to indicate the status 
of the search, and a pointer to the 
raquested entry, if found. 


7 If IDAOLYRC hasn't found the 
termination point for the search 
(determined by IDA019RB), IDAFREEB 
releases the buffer containing the 
just-searched index control 
interval. Steps 4% through 7 repeat 
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ll 


12 


until the termination point for the 
search is reached. 


If the placeholder doesn't point to 
the buffer containing the desired 
data record, IDAFREEB frees the 
eueeer currently pointed to by the 


IDAFRBA determine the RBA of the 
next sequential Cor, if the request 
is keyed, the next higher keyed) 
control interval. 


IDASBF releases all buffers Cexcept 
one) pointed to by the 
placeholder~~buffers that have been 
assigned to the placeholder and 
available for its use, but are not 
currently in use. 


IDAGRB retrieves the data record's 
control interval, located by the 
previous index search if the data 
set is key-sequenced or by the 
caller-specified RBA value if the 
data set is entry“sequenced. 


IDA019S6 is called if the CIDFBUSY 
b is set on in the CIDF 
Cindicating a control interval split 
was interrupted or jis still in 
progress) for this control interval. 
IDA019S6 will set a return code and 
reason code in the RPL if the 
control interval cannot be repaired. 
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0 IDA019RO 
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IDAOI9RR 
Continued 






1 IDAOI9R1 





2 IDAO19RR 
Direct or skip 
sequential 
3 IDAOLORR 

IDARRDRL 


4 IDAOLIRZ 
IDAGRB 


Sequential 







17 IDAOLORR 
COMGET 


18 IDAOL9ORZ 
IDAFREEB 


19 IDAOL9RP 
IDATIJXIT 















5 IDAOI9RR 
PLHEXP 


6 IDAOI9RZ 
IDAABF 


7 IDAOI9RZ 
IDAGRB 
8 IDAOI9RR 
ADVC!I 













9 IDAOIORZ 
IDAFREEB 


10 IDAOI9SRZ 
IDAGNXT 


11 IDAOI9RR 
ADVPLH 


12 IDAOISRR 
ADVCI 


13 IDAOI9RZ 
IDAIREEB 











14 IDAOIIRZ 
IDAGNXT 


1S IDAOI9RR 
GETXCTL 


16 IDAOISRR 
IDARRDRL 





Figure 23. GET Processing (CRRDS) 
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Notes for Figure 23 


0 IDAO019RO is the VSAM record 
management interface module. It 
resides below the 1§-megabyte 
virtual storage line and it 
interfaces between the VSAM user and 
the VSAM record management modules 
that are located above the 
16-megabyte virtual storage line. 


l IDA019R1 is the common record 
management request module. It 
verifies that the request is valid 
and checks for keyed processing of a 
relative record data set. 


2 IDAO1L9RR selects the processing path 
for GET, PUT, POINT, or ERASE and 
for direct, sequential, or skip 
sequential access. 


Direct or Skip Sequential 


The search argument Crelative record 
number) 1s converted to the RBA of the 
control interval that contains it and 
the offset of the record in the control 
interval. 


3 For skip sequential access, IDARRDRL 
verifies that the search argument is 
greater than the previous one, 
indicated by positioning. 


& IDAGRB retrieves the control 
interval by RBA, and IDARRDRL sets 
the PLH pointer to the record. 


Sequential 


5 For sequential retrieval, 
positioning must have been 
established. Status indicators in 
the PLH indicate any exception 
condition, which is handled by 
PLHEXP: 


e For the first request after 
OPEN, positioning is implicitly 
established at the beginning or 
the end of the data set 
(depending on whether processing 
is to be forward or backward). 
To obtain implicit positioning, 
the open must cause connection 
to a control block structure 
that is not shared by other open 
ACBs. Steps 6 through 10 handle 
this exception condition. 


e If the end of the data set (or 
the beginning, for backward 
processing) has already been 
reached, PLHEXP sets an error 
code and returns to the caller. 


e If there has been a read error, 
PLHEXP calls ADVPLH, which skips 
over the unreadable control 
interval, searches for the next 
slot that contains a record, and 
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14 


15 


16 


sets the PLH pointer to the 
record. 


° If the control interval couldn't 
be retrieved before because 
another request had exclusive 
control of it, PLHEXP calls 
GETXCTL to retrieve the control 
interval. 


IDAABF adds buffers to the buffer 
chain for read-ahead buffering. 


IDAGRB retrieves the first control 
interval and scans it for the first 
slot that contains a record. 


If the control interval doesn't 
contain a record, ADVCI advances toa 
the next control interval, and the 
next, until it finds a slot that 
contains a record. 


IDAFREEB frees the current data 
buffer. 


IDAGNXT retrieves the next 
sequential control interval. 


For processing when there is no 
exceptional condition, ADVPLH 
advances to the next slot that 
contains a record and sets the PLH 
pointer to the record. 


ADVCI advances to the next slot that 
contains a record. 


IDAFREEB frees the current data 
buffer. 


IDAGNXT retrieves tha next 
sequential control interval. 


For GET-update, when the buffer 
isn't already under exclusiva 
control, GETXCTL retrieves the 
control interval with exclusive 
Soomro of the buffer that contains 
it. 


IDARRDRL retrieves the control 
interval by RBA and sets the PLH 
pointer to the first slot that 
contains a record. 


common Termination 


17 


18 


19 


COMGET sets RPL fields for the user, 
updates statistics, and releases 
positioning, if necessary. 


For a direct request that is not for 
update, not to have string position 
noted, and not in locate mode, 
IDAFREEB frees the current data 
buffer. 


If the user's EXLST contains an 
active journal exit address, 
IDATJXIT provides the necessary 
journaling information for the 
user's journal exit routine. 
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12 IDAOIIRZ 
IDAWRBFR 

13 IDAO19RZ 
IDAFREEB 


14 IDAOI9RP 
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§ IDAOISRA 
(See Figure 22) 
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7 IDAOQISR4 
GETINCI 


6 IDAQISRA 
(See Figure 22) 









15 IDACLIRM 











16 IDAOLIRT 


17 IDAOLORP ' 
IDAIRNSO 


16 IDAOL9RP 
IDATIXIT 










9 IDAQISRA 
(See Figure 22) 


19 IDAO19RE 
20 IDAOLSRF 
21 IDA019RC 


22 IDAOI9RS 
IDAMVSEG 

43 IDAOI9SRS 
IDAADSEG 


Figure 24. PUT Processing CESDS, KSDS) 
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Notes for Figure 24 


{ 1 IDAOD19R1 is the common record 
| management request module. It 
verifies that the request is a valid 
record management macro, then tests 
the RPL for keyed or addressed 
processing. 


2 When the request requires either 
keyed or addressed processing (not a 
control-interval-processing 
request), IDA01IR4 selects the 
correct processing path for either 
GET, PUT, or POINT, and for 
sequential, skip sequential, or 
direct processing. 


3 When the request is PUT-update, 
IDAO19R4 verifies that the previous 
request was a GET-for~-update. 


4 When the record is added 
sequentially to a key-sequencead data 
set, SQICHECK ensures that the new 
record's key is in the correct 
sequence. 


5 If the caller's previous request 
didn't establish a position in the 
data set, or if the key of the 
record to be inserted is greater 
than the key for the current 
position, IDAO19RA searches the 
index to find the correct position 
for the new record to be inserted. 
IDAQ19ORA returns a pointer to the 
insertion point for the record in 
the buffer. This process occurs 
only after the data set has been 
created. 


6 When the first record of a data set 
is being written, IDAGNNFL obtains 
an empty buffer to build the control 
interval's records in. This process 
occurs only when the data set is 
being created. 


7 When the request is a direct or 
skip-~sequential insert into an 
entry-sequenced data set, GETINCI 
ensures that the last control 
interval that contains data records 
is available to receive the new data 
record. 


8 IDAQI9JRA locates the correct control 
interval and reads it into a buffer 
Cif the request is direct). 


9 When the request is either 


PUT~update or ERASE, IDAO19RL either 
replaces the old record's contents 


C 
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12 


13 


14 


15 
16 
17 


18 


19 


21 


with updated information 
(PUT-~update) or removes the old 
record from the data control 
interval. 


When the request is a direct or 
skip-sequential insert into a 
key-sequenced data set, IDAOILIRA 
searches the index to locate the 
correct sequence set and data 
control interval, and reads both 
control intervals into buffers. 


IDAQIORM inserts the record into the 
buffer at a previously determined 
insertion point. IDA019RM builds 
the record's RDF and inserts the 
record into the control interval, 
adjusting other records as 
necessary. 


If the request is direct PUT and the 
caller doesn't want to retain the 
record's position for subsequent 
record processing requests, RLSEBUFS 
releases the data record's buffer. 


If the buffer was changed by a 
previous update request, IDAWRBFR 
rewrites the buffer's control 
interval into the data set. 


IDAFREEB frees the buffer currently 
pointed to by the PLH. 


If the user's EXLST contains an 
active journal exit address, 
IDATJXIT provides the necessary 
journaling information for the 
user's journal exit routine. 


IDAOQI9RM calls IDAOI9RT for 
spanned-record insertion. 


See Note for step 15. 


If the current buffer isn't empty, 
IDAOLORE is called to split the 
control interval. 


If the control area hasn't enough 
free space for the spanned record, 
IDAOQLORF is called to split the 
control area. 


IDAO1LOYRC finds the position of the 
current entry in the sequence set. 


IDAMVSEG moves one segment from the 
user's area to a buffer. 


IDAADSEG builds a sequence~set entry 
for the segment. 
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Old Record 
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1 IDAQI9RL 







2 IDAO1L9RP 
IDATJXIT 





3 IDA019RM 






4 IDAOL9RP 
IDATJXIT 






5 IDA019RM 
CIFUL 










6 IDAO19RP 
IDAJRNSO 







7 IDAO19RP 
IDATJXIT 






8 IDAOLISE 





9 IDAOLORE 
(See Figures 
26 and 27) 






Old Record Spanned 







10 IDAO19RS 
ERASE 










11 IDAO19RP 
IDAJRNSO 







12 IDAO19RP 
IDATJXIT 







13 IDAO19RC 





14 IDAOI9RS 
CLEARSEG 
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10 IDAO19RS 
Continued 
Update 







15 IDAOL9RS 
DELSEG 












16 IDA0t9RZ 
IDAWRBFR 


17 IDAO19RF 


18 IDA01L9RC 





19 IDA019RS 
IDAMVSEG 









20 IDAOL9RS 
CLEARSEG 





21 IDAOL9RS 
DELSEG 










22 IDAOLORS 
IDAADSEG 





23 IDAOI9RZ 
IDAWRBFR 





Figure 25. Update/Erase Processing (CESDS, KSDS) 
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Notes for Figure 25 


1 IDAO1L9RL removes an unspanned record 
from a control interval CERASE), 
updates a previously read unspanned 
record if its length doesn't change 
(PUT-update), or, if an updated 
record's length is different, erases 
the record's contents in the control 
interval and calls IDA0D19RM to 
insert the record into the control 
interval (PUT-update). 


2 If a record was erased, IDATJXIT 
provides the necessary journaling 
information for the user's journal 
exit routine. 


3 If the record is a different size, 
IDAO19RM inserts it. 


4 If the control interval must be 
split (the new information is 
greater than the amount of free 
space in the control interval), the 
control interval'’s original records 
(before the split) are journalled. 
IDATJXIT provides the necessary 
journaling information for the 
user's journal exit routine. 


5 CIFUL processes the control interval 
when it is full and its contents are 
split Cput into two control 
intervals). 


6 The control-interval-split 
process requires the exclusive 
use of the DIWA control block. 
If another request is using the 
DIWA, IDADR@ waits until the 
DIWA is available. 


7 IDAOD19RE splits the control 
interval. 


See Figure 26 on page 246 when 
the control interval is split 
during data set creation or 
during entry-~sequenced data set 
processing. 
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See Figure 27 on page 248 when 
the control interval is split 
during key-sequenced data set 
processing aftar the data set is 
created. 


IDAO019RS erases or updates a 
spanned record. 


IDA019RC locates the record's 
entry in the sequence set. 


CLEARSEG gets a buffer, clears 
it to free space, and writes it 
to auxiliary storage. 


DELSEG removes a segment'’'s entry 
from the sequence set. 


IDAWRBFR writes the updated 
sequence-set record. 


IDAO1L9ORF splits the control area 
if the updated record has 
additional segments for which 
free control intervals aren't 
available in the control area. 


IDAOD19RC locates the record's 
entry in the sequence set. 


IDAMVSEG moves a segment from 
the user's area to a buffer. 


CLEARSEG clears to free space 
the control intervals occupied 
by segments removed from an 
updated record. 


DELSEG removes a segment's entry 
from the sequence set when the 
updated record has fewer 
segments than the original 
record. 


IDAADSEG builds entries in the 
sequence set for additional 
segments in the updated record. 


IDAWRBFR writes the updated 
sequence~set record. 
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IDA019RM 





1 IDAO19SA 


2 IDAON19RG 
(See Figures 29, 
30, and 31 
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3 IDAO19SA 
EOCA 










4 IDAO19RZ 
IDAWRBFR 





5 IDAOI9RK 










6 IDAOL9SE 
IDAEOVIF 









7 IDAOI9RG 
(See Figure 30) 





8 IDAOI9RK 






9 IDAOI9RP 
IDATJXIT 









10 IDA0N19RG 
(See Figure 29) 






Figure 26. Obtain the Next Control Interval: 
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11 IDAO19RZ 
IDAFREEB 









12 IDAO19RZ 
IDAGNNFL 





13 IDAOI9SA 
BUILDFS 






Next Key Past End 
of Key Range 


14 IDAO19SA 
EOCA 
(See 4 - 8) 










End of Control 
Area Reached 


1§ IDAO19SA 
EOCA 
(See 4 - 8) 
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Notes for Figure 26 
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IDAO019SA obtains the next 
(sequential) control interval to 
contain the data records. 
IDAO019SA selacts this path when 
the data set (key-sequenced of 
entry-sequenced) is being 
created, or when an 
entry~sequenced data set jis 
being processed. 


IDA019RG builds an index entry 
Cin the sequence"set control 
interval) for the full data 
control interval. 


VSAM is designed so that the 
sequence set control interval 
can contain an index entry for 
each data control interval in a 
control area. Sometimes, when 
the keys are very long, the 
sequence-set control interval is 
filled even though soma of the 
control intervals haven't been 
loaded with data records yet. 
When this occurs, IDA0Q19RG Cat 
2) returns a condition code 
indicating that the index entry 
for the full data control 
interval hasn't been built. 
EOCA writes each unused control 
interval in the control area 
Cassociated with the full 
sequence~set control interval) 
as a free control interval. 
EOCA then writes the full data 
control interval jinto the first 
control interval of the next 
control area. 


IDAWRBFR writes the full buffer 
containing the data control 
interval into the data set (the 
first control interval of the 
next control area). 


If the caller is creating the 
data set and specified the 
"speed option,” the unused 
control intervals in the control 
area have not been preformatted. 
IDAQLIRK preformats 
them——rewrites them as 
free-space control intervals. 


If the data set Cor key range, 
if this describes step 14's 
EOCA) is out of space, IDAEOVIF 
calls End of Volume to obtain 
another secondary space 


1974,1985 


10 


11 


12 


is 


14 


15 


allocation for the data set (or 
key range). 


IDAO19RG writes the full 
sequence set control interval 
into tha index. 


If the caller specified the 
"recovery option,” IDA019RK 
preformats the next control 
area's control intervals. 


IDATJXIT provides journal 
information about the data that 
is going into the new control 
area for the user's journal exit 
routine. 


IDAOLORG builds an index entry 
to dascribe the first control 
interval in the new control area 
and puts it into the new control 
area's sequence set control 
interval. 


IDAFREEB frees the buffer that 
contains the full data control 
interval. 


IDAGNNFL obtains an empty buffer 
to continue the caller's data 
set create processing. 


BUILDFS initializes the buffer 
as a free-space control 
interval. 


When the caller's key"sequanced 
data set jis divided into key 
ranges and the key of the record 
being added is greater than the 
high key of the key range, EOCA 
Writes the buffer containing the 
control area's last record into 
the control area. EOQCA then 
writes each unused control 
interval in the control area as 
a free-space control interval. 
EOQCA determines the RBA of the 
next key-range's first control 
area and writes the record into 
the new control interval. 


When the caller's new record 
exceeds the capacity of the last 
control interval in the control 
area, EOCA determines the next 
control area and performs 
necessary processing to allow 
the caller to continue data sat 
create processing. 
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IDA019RM 


(Figure 25) 





1 IDAO19RE 


Exceptional 
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Processing 


2 IDAO19RZ 
IDAGRB 


3 IDAI1O9RZ 


IDAWRBFR 


4 IDAO19RF 
(See Figure 


Normal 
Processing 


§ IDAO19RZ 





28) 


IDAGNNFL 


6 IDA019RM 
(See Figure 


7 IDAO19RH 
(See Figure 


No Space in 
Sequence Set 
Control 
Interval 


8 IDAO19RZ 
IDAFREEB 


9 IDAO19RF 
(See Figure 28) 


Figure 27. 
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(See Figure 32) 
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IDAWRBFR 
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IDAFREEB 
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Notes for Figure 27 


l IDAOLORE divides a control 
interval's records between the 
control interval anda 
free-space control interval. 


2 If the sequence set record 
associated with the control 
interval has been modified by 
some other request, IDAGRB 
obtains a current copy of the 
sequence set control interval in 
a buffer. 


3 If the data control interval has 
been modified by another request 
before it has been written back 
to the data set, IDAWRBFR writes 
the updated control interval 
into the data set. 


& If the control interval's 
control area doesn't contain a 
free-space control interval, 
IDAQDI9RF splits the control 
area. 


5 IDAGNNFL obtains an empty 
buffer. The buffer is used to 
build the new data control 
interval, using records from the 
control interval being split. 


IDAOI9ORE distributes the records 
batween the current control 
interval (being split) and the 

nd new control interval Cin the 
newly obtained buffer). 


6 IDAOLORM inserts the data record 
(the record that wouldn't fit 
and caused the control interval 
split) into the control 
interval. 


7 IDA019RH builds an index entry 
for the new control interval. 
IDAO019RH also puts the entry 
into the sequence set control 
interval associated with the 
control area. 
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If the entry won't fit in tha 
sequence set control interval, 
IDAOI9SRE forces a control area 
split. IDAFREEB frees the 
buffer that was obtained to 
contain the new data control 
interval. 


IDAOLSRF splits the control 
area. 


If the user's exit list contains 
an active journal exit address, 
IDATJXIT provides journaling 
information about tha control 
area split and the data records 
that were moved from one control 
interval to another. 


If the user's exit list contains 
an active journal exit address, 
IDATJXIT provides journaling 
information about the data 
records that were moved within 
the control interval to allow 
the new data record to be 
inserted. 


IDAWRBFR writes the new control 
interval into the data set. Of 
the two control intervals that 
resulted from the control 
interval split, this control 
interval contains the records 
with the highest keys. 


IDA019RH writes the updated 
oe set record (from set 


IDAWRBFR writes the updated 
Cold) control interval into tha 
data set. 


IDAFREEB frees the buffer 
obtained during 5. IDAQLIRE 
repositions the sequence set 
pointers to point to the data 
control interval into which the 
insert was made. 


IDASBF releases all other 


buffers associated with the 
placeholder (PLH). 
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IDA019RE 
(See Figure 27) 


1 IDAOIORF IDAO19RF y IDAOLORF 
Continued Continued 





No Space fora 


New Control Area Repeat to Copy 
Each Required IDAGNNFL 
Control Interval 
IDAEOVIF into the New 
Control Area 27 IDAO19RZ 
IDAFREEB 
3 IDAO1ORZ 16 IDAOL9RZ 
28 IDAOL9RZ 


IDAWRBFR 
17 IDAO19RZ 


4 IDAOIORK IDAGNXT = =— | ee et ee ee ee ee 
The Record Insert 


Point Is in the 
New Control Area 


29 IDAOIL9RZ 
IDAFREEB 





$ IDAOI9SF 18 IDAO19RZ 
IDAFREEB 


6 IDAOISRZ 
IDAF 
tees 19 IDAOL9RZ 
IDAWRBFR 
7 IDAOI9RI 
IDANEWRD 


New Key Less 20 IDAOISRI d 
Than Old Key (See Figure 31) The Record Is to Be 


Added to the End 
8 IDAOI9RZ of the Data Set 
IDAWRBFR 21 IDAOLORZ 
IDAGRB 31 IDADISRM 
(See Figure 25) 


9 IDAO1L9RV 
22 IDAO19RP ee es SS 


IDATJXIT 
10 IDAOI9RZ =—«- |_| en ees ms ee er ee 32 IDAQI9RZ 
IDAWRBFR Qld Control Area’s IDASBF 


Sequence Set : 





30 IDAOI9RZ 
IDAGRB 
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New Key Greater Record Was The Record is Not to 
Than Old Key Incorrectly Split Be Added to the Enc 
11 IDAOI9RZ 23 IDAOI9RZ of the Data Set 
IDAWRBFR IDAGNNFL 33 IDA0N19RZ 


IDASBF 


12 IDAOLORZ 24 IDAOISRZ 
IDAGRB IDAFREEB 34 IDAOI9RZ 
IDAGRB 
13 IDAOI9RZ 25 IDAOISRZ 
IDAWRBFR IDAWRBFR 
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Figure 28. Split a Control Area 
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Notes for Figure 28 15 


1 


6 


7 


IDAOLORF moves some of a control 
area's control intervals into a 
free-space control area. 


If a free-space control area is 
not available, IDAEOVIF calls 
End of Volume to obtain more 
space for the data set. 


IDAGRB obtains a current copy of 
the control area's sequence set 
record. 16 


IDAO19RK preformats the 
free-space control area. 


If the control area can't be 17 
split because it is filled with 

a single spanned record, 

IDAO19SSF builds a new 

sequence-set record and clears a 

data buffer to free space: 


IDAFREED frees the current 
sequence-set buffer. 


IDANEWRD initializes a new 
sequence-set record. 


NeW Key Less Than Old Key 


(The "old" key is the key of the 18 
Spanned record that fills the 
control area.) 


8 


9 


10 


IDAWRBFR writes the new 
sequence-set record. 


IDAODIIRV obtains the 

sequence-set record that 

precedes the sequence-set record 

of the control area filled with 

the spanned record. IDAOLIRV 

changes the sequence-set 19 
record's horizontal pointer to 

point to the new sequence-set 

record (step 7). 


IDAWRBFR writes the sequence-set 
record (step 9). 


20 


New Key Greater Than Old Key 


il 


l2 


13 


14 
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IDAWRBFR writes the new 2l 
sequence-set record. 


IDAGRB reads the sequence-set 

record of the control area 22 
filled with the spanned record 

and changes its horizontal 

pointer to point to the new 

sequence-set record. 


IDAWRBFR writes the sequence-set 
record (step 12). 


IDAHLINS changes the 
second-level index record to 
point to the new sequence-set 
record. 


© Copyright IBM Corp. 1974,1985 


IDAABF obtains as many buffers 
as possible to allow the 
control-area~split routine to 
function as smoothly as 
possible. The maximum number of 
buffers obtained is equal to the 
number of control intervals to 
be moved into the new control 
area. The buffers are used to 
copy control intervals from tha 
old control area and rewrite 
them into the new control area. 


IDAGRB obtains a copy of the 
first control intervel that is 
to be copied into the new 
control area. 


When this sequence is repeated 
for subsequent control 
intervals, IDAGNXT obtains the 
next sequential data control 
interval in the control area 
until all control intervals that 
are to be moved have been 
processed. 


IDAOLORF modifies the output RBA 
value in the control interval 
buffer's BUFC, so that the 
control interval is written into 
the new control area. 


IDAFREEB frees the buffer. 
buffer's contents will be 
written into the new control 
area when it is used again to 
contain another control 
interval. 


The 


17 and 18 are repeated for each 
control interval in the old 
control area that is moved into 
the new control area. 


IDAWRBFR writes all buffers not 
yet written into the new control 
control area. 


IDAOQLORI builds a new sequence 
set record for the control area 
and adjusts other higher-level 
index records to point to the 
new sequence set record. 


IDAGRB obtains a current copy of 
the old control area's sequence 
set record. 


If the user's exit list contains 
an active journal exit, IDATJXIT 
provides journaling information 
about the control interval being 
moved-—its old and new RBAs. 


If the sequence set record could 
not be split at the point at 
which the data was split, some 
control intervals in the new 
control area are removed from 
the new control area so that 
both old and new sequence sat 
records are accurate. These 
control intervals are rewritten 
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23 


24 


25 


26 


27 


as free-space control intervals 
in the new control area; they 
remain intact in the old control 
area. Steps 23 through 25 
process this exceptional 
condition. 


IDAGNNFL obtains an empty 
buffer. IDAOI1ORF builds a 
free-space control interval in 
it 


IDAFREEB frees the buffer, so 
that it will update the control 
area with a free-space control 
interval when the buffer is used 
next. 


IDAWRBFR writes all buffers not 
yet written into the new control 
area. 


IDAGNNFL obtains an empty 
buffer. IDAOILSRF builds a 
free-space control interval in 
it. The free-space control 
interval replaces each control 
interval in the old control area 
that has been copied into the 
new control area. 


IDAFREEB frees the buffer, so 
that it will update the old 
control area with a free-space 
control interval when the buffer 
is used next. Steps 26 and 27 
are repeated until all control 
intervals in the old control 
area that have been copied are 
deleted. 
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IDAWRBFR writes all buffers not 
yet written into the old control 
area. 


If the insert point for the 
record to be added to the data 
set is in the new control 
interval, IDAFREEB frees the 
buffer that contains the old 
sequence set control interval. 


IDAGRB obtains a copy of the 
sequence set control interval 
associated with the new control 
area. 


If the record is to be inserted 
at the end of the data set, 
IDA019RM inserts the record. No 
further control area split 
processing is performed. 


If the record is not to be added 
to the end of the data set, 
IDASBF releases all buffers 
associated with the placeholder, 
except the buffers contained the 
data record's insert point and 
the sequence set control 
interval. 


Same as 32. 


IDAGRB obtains a current copy of 
the data control interval that 
contains the data record's 
insert point. 


IDAOQ19ORF returns to the control 
interval split routine to split 
the control interval and insert 
the data record. 
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Notes for Figure 29 


IDAO019RG is called by IDAO019SA when 
a key-sequenced data set is being 
created. 


l This figure describes the 
addition of an index entry to 
the sequence~set control 
interval when a data control 
interval is full. 


2 If IDAOLYRG is being called for 
the first time, IDAAQR obtains a 
control interval for a 
sequence-set record. 


3 If all allocated space in the 
data set has been used, IDAEOVIF 
obtains another extent for the 
data set. 


& If the newly obtained extent 
must be preformatted before it 
eek be used, IDAOLIRK preformats 
it. 
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INTNEWRC initializes the control 
interval as a sequence-set 
control itnterval. 


IDAGNFL obtains a buffer for the 
sequence-set control interval. 


IDAIST uses the high key value 
of the data control interval to 
build an index entry in the 
sequence-set control interval. 
The key is front- and 
rear-compressed before the entry 
is built. 


If there ts not enough room to 
insert the index entry into the 
sequence-set control interval, 
IDA019RG indicates this and 
returns to IDAO19SA. The entry 
is not put in the sequence-set 
record. 
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IDA0I9RG 
Continued 






Update Higher- 
Level Index 
Records 







10 IDAOI9RN 
IDAAQR 






IDAOIORJ 
IDAR 






IDAO19RG 
IDAIST 









IDAOI9RZ 
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Figure 30. Create-Time Sequence~Set Record Processing: Write 
the Record (End of Control Area) 
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When the control area is full, 
IDAO19ORG writes its sequence-set 
record into the index and 
initializes a new sequence-set 
record for the new control area. 


IDAWR writes the updated 
sequence-set record into the 
index. This is the sequence~set 
record associated with the old 
control area. 


IDAAQR obtains the next control 
intervel for a sequence~set 
record. 


If all allocated space in the 
data set has been used, IDAAQR 
calls IDAEOQVIF to obtain another 
extent for the data set. 


If the newly obtained extent 
must be preformatted before it 
can be used, IDAAQR calls 
IDAO019RK to preformat it. 


INTNEWRC initializes the control 
interval as a sequence-set 
record. 


IDAGNFL obtains a buffer for the 
sequence~set record. 


IDAWR writes the new 
sequence-set record with a dummy 
index entry-—an entry with 
length=0 and front-key 
compression=0. 


Read obtains a copy of the 
previously written (from 2) 
sequence-set record. 


IDA019RG builds a horizontal 
pointer entry to allow the 

record to point to the newly 
created sequence-~set record. 


IDAER removes the dummy entry 
from the sequence~set record. 


IDAWR writes the updated 
(previous, from step 7) 
sequence-set record into the 
index. The sequence~set record 
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10 


1l 


12 


13 


14 


15 


16 


now has the "proper" ending 
entry. 


IDAO01ORG adjusts the 
higher-level index records to 
reflect the addition of a new 
sequence-set record. 


When a higher-level index record 
is required, IDAAQR locates the 
control interval containing it. 


If all allocated space in the 
data set has been used, IDAAQR 
calls IDAEOVIF to obtain another 
extent for the data set. 


If the newly obtained extent 
must be preformatted before it 
can be used, IDAAQR calls 
IDAON1LORK to preformat it. 


IDAODLORG obtains more virtual 
storage Cusing GETMAIN) for 
another ICWA, if all other ICWAs 
being used, and initializes 
Tt. 


IDAR reads in the higher level 
index record. 


IDAIST builds an index entry to 
describe the sequence~set index 
record and puts it into the 
higher level index record. 


If the entry won't fit in the 
higher level record, IDAFREEB 
frees the buffer containing the 


oe level index record (from 


IDAWR writes out the updated 
higher level index record, so 
that the index is always as 
current as possible. Steps 10 
through 146 are repeated to 
update as many levels of the 
index as are required. 


INTNEWRC initializes a buffer 
for the new sequence-set index 
record. 


IDAGNFL obtains an empty buffer 


for the new sequence-set index 
record. 
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IDAO19RP 
ENDREQ 


J 










1 IDAO19RG 


2 IDAOI9SRJ 
IDAWR 





Figure 31. Create-Time Sequence-Set Record Processing: Write 
the Record (Closing the Data Set) 


Notes for Figure 31 sequence-set record into the 
index. 
1 When the user closes the data 
set after it 1s created, 2 IDAWR writes the sequence-set 
IDAO019RG writes the last record into the index. 
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IDAOI9RE 












1 IDAO19RH 


2 IDAO1I9RC 


3 IDA0I9RH 
COMPRS 


4 IDA019RH 
COMPRS 










5 IDAO19RZ 
IDAWRBFR 





Figure 32. 


Notes for Figure 32 


l 


IDAQI9RH builds an index entry 
and inserts it in the proper 
Position in the sequence~set 
record when a control interval 
is split. 


IDAQI9ORC searches the compressed 
index entries in the 
sequence-set record to locate 
the insert point for the new 
index entry. 
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Noncreate~Time Sequence~Set Processing 


COMPRS performs rear key 
compression for the newly built 
index antry. 


COMPRS modifies the front and 
rear key compression of index 
entries in the sequence-set 
record that might require 
modification as a result of 
inserting a new compressed key 
entry. 


IDAWRBFR writes the updated 


sequence-set record into the 
Sequence set. 
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IDA0I9RF 
(See Figure 28) 


1 IDAOI9RI IDAOI9RI 


Continued 
2 IDAOILSRI 
ENTKEY 11 IDAOI9RI 
GETSREC 
12 IDAOI9RZ 
IDAGRB 
4 IDAOI9RZ 
IDAFREEB 13 IDAOIL9SRI 
IWRITE 


(See 8 - 10) 
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$ IDAOISRI 
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6 IDAOL9RN 
IDAAQR 

7 IDAOLIRZ . ) 
IDAGNFL 


8 IDAOI9RI 
IWRITE 














9 IDANI9RH 
(See Figure 32) 






10 IDAOI9RZ 
IDAFREEB 


Figure 33. Update the Index: Adding to the End of a Key Range 
or Data Set 
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IDAQLORI updates higher level 
index records when a control 
area is split. If the control 
area being split is at the end 
of a key range or data set, this 
figure describes the updating 
sequence. 


ENTKEY locates and extracts the 
next to last section entry from 
the index record. 


ENTKEY extracts the last section 
entry from the index record. 


IDAFREEB frees the current index 
record. 


NEWRCRD builds and initializes a 
new index record. 


IDAAQR obtains a RBA value for 
the new index record. 


If all allocated space in the 
data set has been used, IDAAQR 
calls IDAEOVIF to obtain another 
extent for the data set. 


If the newly obtained extent 
must be preformatted before it 


1974,1985 


10 


ll 


12 


13 


can be used, IDAAQR calls 
IDAOQ1LORK to preformat it. 


IDAGNFL obtains an empty index 
buffer for the new index record. 
When the record is built, it 
will be written into the index 
at the RBA obtained by IDAAQR. 


NEWRCRD builds the new index 
record. 


IWRITE writes the new index 
record into the index. 


IDAOL9RH writes the index 
record. 


IDAFREEB frees the index 
record's buffer. 


GETSREC obtains the previous 
sequence~set record. 


IDAGRB retrieves the newly 
written index record. 


GETSREC adjusts the index 
record, removing the last key 
entry from the record. 


IWRITE rewrites the updated 
index record into the index. 
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IDA019RF 


(See Figure 28) 





1 IDAO19RI IDAOLISRI IDAOI9RI 

Continued Continued 

2 IDAOI19RJ 
Entry Won’t Fit Write Index Record 
_—-——_- —- — in Index Record Containing New 
If Split Could Frir 
y 

Not Be Made 
at Specified 16 IDAOLORI 
Point 10 IDAOISRI IWRITE 


3 IDAO19RZ 


IDAFREEB 








4 IDAOL9RI 
GETSREC 







S IDA019RZ 
IDAGRB 





6 IDAOLORI 
FINDSP 





7 IDAOI9RI 


LNEXTE 





Split Is Complete. 
Make Entry in 


Higher Level 21 IDA019RN 
8 IDAO19RB ee 


9 IDA019RH 


(See Figure 32) 





Figure 34. Update the Index: 
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Range or Data Set) 
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(See Figure 32) 
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IDAOI9JRI updates the higher 
level index records when a 
control area is split. If the 
control area being split is not 
at the end of a key range or 
data set, this figure describes 
the updating sequence. 


IDAODI9SRJ splits the current 
sequence-set record. 


If the sequence-set record could 
not be split at the specified 
point, 3 through 7 adjust the 
split point so that it can be 
split. 


IDAFREEB frees the index buffer. 


GETSREC obtains the sequence-set 
record from the index CIDAODLIRJ 
destroyed the old copy during 
its processing.) 


IDAGRB retrieves the 
sequence-set record. 


FINDSP scans the sequence-set 
record to locate the split 
point. 


LNEXTE adjusts the split point 
by one entry. 2 is retried, and 
3 through 7 repeat, until the 
sequence-set record is split. 


IDAQLORB searches the index to 
locate the insert point in the 
next higher level of the index. 


IDAOL9RH inserts the new entry 
in the higher level index 
record. 


If the entry doesn't fit in the 
higher level index record, steps 
10 and 11 attempt to split it. 


FINDSP locates the midpoint of 
the index record entries in the 
higher level index record. 


IDAOLORJ splits the index 
record. If the split could not 
be made at the specified point, 
12 through 15 adjust the split 
te so that the record can be 
split. 
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13 


14 


15 


16 


17 


18 


19 


20 


2l 


22 


IDAFREEB frees the index 
record's buffer. 


GETSREC obtains the higher level 
index record from the index 
CIDAOLIORJ destroyed the copy in 
the buffer during its 
processing). 


IDAGRB retrieves the index 
record. 


LNEXTE adjusts the split point 
by one entry. Step 11 is 
retried, and 12 through 15 
repeat, until the index record 
is split. When the split is 
correct, 8 and 9 insert the 
entry that would not fit before. 


IWRITE writes the index record 
containing the new entry into 
the index. 


IDAO019RH writes the index 
record. 


IDAFREEB frees the index 
record's buffer. 


If a new high-level index record 
was built by this index 
upgrading processing, IDAEOVIF 
updates the catalog information 
for the index. 


If a new high-level index record 
is needed, NEWRCRD obtains a RBA 
and buffer for the record. 
NEWRCRD builds the new record 
and does 16 through 19 to write 
the record and adjust the 
index's catalog information. 


IDAAQR obtains a RBA value for 
the new high-level index record. 


If all allocated space in the 
data set has been used, IDAAQR 
calls IDAEOVIF to obtain another 
extent for the data set. 


If the newly obtained extent 
must be preformatted before it 
can be used, IDAAQR calls 
IDAODLORK to preformat it. 


IDAGNFL obtains an empty index 
buffer for the new index record. 
When the record is built, it 
will be written into the index 
at the RBA obtained by IDAAQR. 
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Figure 35. PUT/ERASE Processing (RRDS) 
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Notes for Figure 35 


1 IDAO019R1 is the common record 
management request module. It 
verifies that the request is 
valid and checks for keyed 
processing of a relative record 
data sat. 


2 IDA019RR selects the processing 
path for GET, PUT, POINT, or 
ERASE and for direct, 
sequential, or skip sequential 
access. 


Update or Erase 


PUT-update or ERASE requires that a 
GET-update was previously issued. 
Therefore, the control interval that 
contains the record to be updated or 
deleted is in the data buffer, and 
the PLH points to the record. 


3 For PUT-update, IDA019RQ lays 
the updated record over the old 
record. For ERASE, IDA019RQ 
fiils the slot with binary zeros 
and changes the RDF to indicate 
an empty slot. 


& For a direct request that is not 
to have string position noted, 
IDAWRBFR writes the data buffer 
to the control interval. 


5 IDAFREEB frees the data buffer. 


If the user's EXLST contains an 
active journal exit address, 
IDATJXIT provides the necessary 
journaling information for the 
user's journal exit routine. 


Insert 


The slot indicated by the search 
argument or by current positioning 
must be empty. If it isn't, the 
record to be inserted isn't 
inserted, beacause of duplicate 
record. 


7 PUTNONSQ locates the control 
interval for a direct or skip 
sequential request. The search 
argument Crelative record 
number) is converted to the RBA 
of the control interval that 
contains it and the offset of 
the record in the control 
interval. 


8 For skip saquential access, 
IDARRDRL verifies that the 
search argument is greater than 
the previous one, indicated by 
positioning. It retrieves the 
control interval by RBA and sets 
lat pointer to the indicated 
slot. 


LY26~-3907-1 © Copyright IBM Corp. 1974,1985 


9 If the indicated relative record 
number is in a control interval 
beyond the last control interval 
currently in the data set, 
GETSPACE calls IDA019RK to 
preformat the next control area. 
If processing is for creation 
(the data set was empty when 
opened) with the SPEED option, 
the rest of the control 
intervals in the current control 
area are preformatted before a 
new control area is 
preformatted. Control intervals 
are preformatted until the one 
that contains the indicated 
relative record numver has ween 
preformatted. GETSPACE calls 
IDAEOVIF when additional space 
15 needed for control areas. 


10 To insert the record into a slot 
in a control interval not 
currently in the data set, no 
control interval is read. 
IDAGNNFL gets an empty data 
ee and formats it with empty 
slots. 


PUTSQ1ST locates the first 
control interval of the data set 
when the first request after 
OPEN is sequential. 


12 IDAABF adds additional buffers 
to the buffer chain for 
read~ahead buffering. 


13 If processing is not for 
creation (that is, the data sat 
contained formatted control 
areas when opened), IDARRDRL 
retrieves the first control 
interval and sets the PLH 
pointer to the first slot in the 
control interval. 


14 If processing is for creation, 
IDAGNNFL gets an empty data 
poor and formats it with empty 
slots. 


Noncreate 


15 PUTSQNCR processes sequential 
requests when processing is not 
for creation. If the previous 
request was POINT with KGE Ckey 
greater than or equal), the 
control interval identified by 
the search argument of the POINT 
is retrieved. Otherwise, 
PUTSQNCR advances the PLH 
pointer to the next slot. If 
there ara no more slots in the 
control interval, the next 
control interval is retrieved. 


16 When additional space is 
allocated, IDADRQ@ gets exclusive 
use of the data set for 
axtension. 
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17 


18 


19 


20 


When the next control interval 
is in the next control area, 
GETSPACE calls IDA019RK to 
preformat the next control area. 
If additional space is needed 
for the next control area, 
GETSPACE calls IDAEOVIF to 
allocate the space and preformat 
the first control area in it. 


When there are no more slots in 
the current control interval, 
IDAFREEB frees the current data 
buffer. 


IDAGNXT retrieves the next 
sequential control interval. 


If the previous request was 
POCINT with KGE, PUTNONSQ 
retrieves the control interval 
identified by the search 
argument of the POINT. 


Create 


2l 


22 


23 


PUTSQCRE processes sequential 
requests when processing is for 
creation. PUTS@CRE advances the 
PLH pointer to the next slot in 
the current data buffer. 


When the next control interval 
is in the next control area, 
GETSPACE calls IDAO19RK to 
preformat the next control area. 
If additional space is needed 
for the next control area, 
GETSPACE calls IDAEOVIF to 
allocate the space. Unless the 
SPEED option is indicated, 
IDAEOVIF preformats the first 
control area in the nenly 
allocated space. 


When there are no more slots in 
the current control interval, 
IDAFREEB frees the current data 
buffer. 
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When the next control interval 
hasn't been preformatted, 
IDAGNNFL gets an empty data 
apis and formats it with empty 
slots. 


When the next control interval 
has been preformatted and the 
RECOVERY option is indicated, 
IDAGNXT retrieves the next 
control interval and puts it in 
the data buffer. 


When the next control interval 
has been preformatted and the 
SPEED option is indicated, 
IDAGRB retrieves the next 
control interval by RBA and puts 
it in the insert buffer. Using 
the insert buffer causes an 
update-write channel program to 
be used when the control 
interval is written. 


IDA019RQ moves the record to be 
inserted into its slot, unless 
the slot already contains a 
record. The record to be 
inserted is considered a 
duplicate. 


For a direct request that is not 
to have string position noted, 
IDAWRBFR writes the data buffer 
to the control interval. 


IDAFREEB frees the data buffer. 


For a direct request that is not 
to have string position noted, 
where the current data buffer is 
the insert buffer, IDASBF writes 
the insert buffer and removes it 
from the normal buffer chain. 


If the user's EXLST contains an 
active journal exit address, 
IDATJXIT provides the necessary 
Journaling information for the 
user's journal exit routine. 


© Copyright IBM Corp. 1974,1985 


J 


J 


J 


Restricted Materials of IBM 
Licensed Materials —- Property of IBM 









1 IDAOI9RI 






2 IDAOI9RX 





3 IDAOI9R4 


4 IDA0NI9RX 






5 IDAO19R4 | 





Figure 36. Path Processing 


Notes for Figure 36 & If IDA0N19R4& detected that the 
user's data area was too small 
1 IDAO19R1I checks the user's RPL for the alternate-index record, 
for validity and assigns a PLH IDAO019RX increases the size of 
to it. It detects a request for the area. 
access to a base cluster by way 
of an alternate index. IDA0N19RX builds an inner RPL to 
be used for the request for 
2 IDAOI9RX builds an inner RPL to access to the base cluster. 
— be used in retrieving the 
alternate~index record needed 5 IDA019R4 issues the request for 
for the request. access to the base cluster. 
3 IDA019R4 retrieves the IDAOI9SRX transfers any return 
alternate-index record needed code from the inner RPL to the 
for the request. user's RPL. 


C 
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1 IDAO19R4 







2 IDAO19RU 


3 IDAO19R4 








4 IDA019RU 


5 IDAO19R4 






Figure 37. Upgrade Processing 


Notes for Figure 37 


1 


For a PUT or ERASE, when there 
is an upgrade table CUPT), 
indicating that the base cluster 
has an upgrade set, IDA019IR4G 
calls IDA019RU for upgrade 
processing. 


For each alternate index in the 
upgrade set, IDAO19RU determines 
whether the PUT or ERASE 
requires an alternate~index 
record or a pointer in an 
alternate-index record to be 
added or removed. 
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For each alternate index that 
requires upgrading, IDA019R4¢ 
does the I/0 to accomplish 
upgrading. 


If each alternate index was 
upgraded successfully, IDAO19R4¢ 
does the 1/0 for the PUT or 
ERASE. 


If the I/0 for the PUT or ERASE 
failed, IDAQ19RU backs out 
Cundoes) the upgrading for each 
alternate index. 


For each alternate index whose 
upgrading was backed out, 
IDAO19R4 does the I/0 to 
accomplish backing out. 
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Note: In some steps, 
extemal procedures of 
IDAO19RZ are indicated 
under IDA019R2 or 
IDAOISRY, to which 
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Figure 38. Buffer Management (Part 1 of 3) 
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Notes for Figure 38 (Part 1 of 3) 


1 IDAOLORZ is entered for all 
frequently used buffer 
management functions. 
code in a register that 
bled dba “pe eee ee 

unction. or requests wi thous 
shared resources specified, 
calls IDAOI9R2; for raquests 
with shared resources speci fiad, 
it calls IDAO19RY. Some 
procedures (such as IDAFREEB) 
are literally part of IDA0D19RZ, 
but their processing actually 
takes place in IDAO019R2 or 
IDAOD1SRY. (CFor example, in this 
figure, IDAFREEB is shown as a 
procedure of both IDAOI19R2 and 
IDAO19RY.) 


Without Shared Resources 


2 IDAFREEB makes an index or 
insert buffer available for 
reassignment. For sequential 
retrieval, when IDAFREEB frees a 
data buffer, it initiates 
read-ahead buffering if enough 
Hale buffers are available for 
j 


It sets a 


3 For read-ahead buffering, 
IDAWAIT lets any previously 
started I/0 finish. 


& IDAFRBA determines the RBA of 
the next control interval. 


5 When one or more of the RBAs in 
the I/0 chain are not in 
ascending sequence, IDARVRSI 
puts them in ascending sequence. 


6 IDAQ19R3 CIZO management) issues 
I/0 for read-ahead buffering. 


7 IDAWRBFR writes the buffer(s) in 
the current I/0 chain. 


8 IDAWAIT lets any previously 
started I/0 finish. 


9 IDAN019R3 (I/O management) issues 
I/0 for the current chain. 


10 IDAWAIT lets the I/0 started in 
step 9 finish. 


11 IDASBF moves buffer(s) from the 
ee back to the buffer 
pool. 


12 Before IDASBF moves a buffer 
back to the buffer pool, 
IDAWRBFR ensures that no writes 
are pending against the buffer. 


13 IDAWAIT lets any I/0 pending 
against the buffer finish. 


146 IDAGRB reads an index or a data 
control interval. 
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16 


17 


18 


19 


21 


24 


26 


27 


IDAWAIT lets any previously 
started 1/0 finish. 


IDARVRSI puts in ascending 
sequence any RBAs in the I70 
chain that are out of ordar. 


Unless the index or data control 
interval is already in the 
buffer pool, IDA019R3S ¢I70 
management? issues I/0 to read 
it. 


IDAGNFL supplies a work buffer 
for index processing or for a 
control~interval split. 


IDAGNNFL supplies an ampty data 
buffer for sequential output 
processing. 


IDAWAIT lets any previously 
started I/0 finish. 


When enough buffers are already 
flagged for output, IDAOIIRS 
CI/0 management) issues I/0 to 
write them. 


If the current buffer's contents 
have been modified, IDAWRBFR 
writes it. 


IDAWAIT lets any I/0 pending 
against the buffer finish. 


IDAGNXT ensures that the next 

data control interval has been 
read and provides a pointer to 
the buffer that contains it. 


IDAWAIT lets any pending I/0 
finish. 


IDAO019R3 CIO management) issues 
I/O to read a buffer that was 
not read previously because 
another request had exclusive 
control of it. 


IDAEXCL obtains exclusive . 
control of a control interval 
idantified by RBA. 


IDAGNSGW obtains an empty data 
Soiree from the currant IZ0 
chain. 


With Shared Resources 


29 


30 
31 


32 


IDAFREEB makes a buffer 
available for reassignment. 


IDAWRBFR writes a buffer. 


If the user's EXLST contains an 
active journal exit address, 
IDATJXIT notifies the journal 
exit routine of an impending 
write 


IDA019R3 CI/O management) issues 
I/0 for the write. 
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33 IDAWAIT lets I/0 for the write 36 If an I/O error occurred and the 
finish. user's EXLST contains an active 
journal exit address, IDATJXIT ) 
34 If an I/0 error occurred, passes control to the journal 
IDA019R5 builds an error exit routine. 
message. 
37 IDASBF frees the current buffer. 
35 If an I/O error occurred and the 
AMB contains an exception exit 38 If the buffer's contents have 
address,» IDAEXEX passes control been modified, IDAWRBFR writes 
to the exception exit routine. it. 
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IDADRQ 






41 IDAOI9RY 
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42 IDAMI9R3 
IDAO19R3 





43 IDAO19RZ $5 IDAOLORY 
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IDAWAIT 





44 IDAO19RS 


4§ IDAQ19RP 
IDATIXIT 


IDAEXEX 


47 IDAOLORY 
IDAGNFL 





48 IDAO1LORY 
IDAGNNFL 


49 IDAOI9ORY 


IDAGNXT 


$0 IDANISRW 
IDAFRBA 






$1 IDAOI9RY 
IDAGRB 



















46 IDAOIORS 









IDASCHBF 


$6 IDAOI19SE 
IDADRQ 














$7 IDAOLORY 
IDAMRKBF 





58 IDAOLORY 
IDAGWSEG 





$9 IDAO19SY 
IDAWRBFR 


Wait Routine 


60 IDA0L9RZ 
IDAWAIT 


Figure 38. Buffer Management (Part 2 of 3) 
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Notes for Figure 38 (Part 2 of 3) 


39 


40 


41 


42 


43 


44 
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47 
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IDAGRB reads an index or a data 
control interval. 


If the buffer is already being 
read, IDADR@ suspends processing 
for the current request. 


Unless the index or data control 
interval is already in the 
buffer pool, READBFR reads it. 


IDADLOR3 CI/O management) issues 
I/0 for the read. 


IDAWAIT lets the I/O started in 
step 42 finish. 


If an I/O error occurred, 
IDA019R5 builds an error 
message. 


If an I/O error occurred and the 
user's EXLST contains an active 
journal exit address, IDATJXIT 
passes control to the journal 
exit routine. 


If an I/O error occurred and the 
AMB contains an exception exit 
address, IDAEXEX passes control 
to the exception exit routine. 


IDAGNFL supplies a work buffer 
for index processing or for a 
control-interval split. 


IDAGNNFL supplies an empty data 
buffer for sequential output 
processing. 


IDAGNXT ensures that the next 
data control interval has been 
read and provides a pointer to 
the buffer that contains it. 


IDAFRBA datermines the RBA of 
the next control interval. 


1974,1985 


§1 


52 


53 


54 
55 


56 


57 


58 


59 


60 


IDAGRB obtains tha control 
interval. 


IDAWRTBF processes a WRTBFR 
macro to write the buffer(s) 
indicated by the caller. 


If any of the buffers to be 
written are being used by 
another request, IDADRQ suspends 
processing for the current 
request until the other request 
makes the buffers available. 


IDAWRBFR writes the buffers. 


IDASCHBF processes a SCHBFR 
macro to search the buffer pool 
for the RBA indicated by the 
user. 


If a buffer contains the 
indicated RBA but is in the 
process of having the control 
interval read into it, IDADRQ 
suspends processing for the 
current request until reading is 
finished. 


IDAMRKBF processes a MRKBFR 
macro to mark a buffer to be 
released or for output. 


IDAGWSGW obtains an empty data 
cater from thea current I/0 
chain. 


If the buffer's contents have 
oe modified, IDAWRBFR writes 
it. 


For a synchronous request, 
IDAWAIT issues a WAIT macro for 
the I/0 to finish. For an 
asynchronous request, IDAWAIT 
sets a flag for the I/0 
manager's asynchronous routine 
to pass control to IDAWAIT after 
the I/0 is finished. 
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IDAABF 


73 IDAOL9RV 


63 IDAODLI9RW 
IDAAIBF 
74 IDAO19RZ 
IDAGRB 





64 IDAOLORW 
IDAGWSGW 





7§ IDAO19R3 
IDAMI9R3 





65 IDA0N19RZ 
IDAWRBFR 


76 IDA019RZ 
IDAWAIT 


66 IDAN19RW 
IDAFRBA 





67 IDA0N19RZ 
IDAWRBFR 


68 IDA019RZ 
IDAGRB 


69 IDAO19RC 


70 IDA019R3 
IDAMI9R3 





71 IDAO19RZ 
IDAWAIT 


Figure 38. Buffer Management (Part 3 of 3) 
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Notes for Figure 38 (Part 3 of 3) 
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62 


63 


64 


65 


66 


67 


68 
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IDAODISRW receives requests for 
buffer management functions that 
are used only infrequently. 


For processing without shared 
resources, IDAABF adds buffers 
to a string's I/0 chain to 
shorten processing time. 


For processing without shared 
resources, IDAAIBF adds the 
insert buffer to a string's I/0 
chain for a control-area split 
or for updating or inserting a 
spanned record. 


For processing without shared 
resources, IDAGWSGW locates 
empty buffer(s) in the string's 
I/0 chain so that a spanned 
record can be inserted or 
lengthened (with additional 
segments) without using buffers 
that are being used for 
read-ahead buffering. 


IDAWRBFR writes empty buffers 
Whose contents have been 
modi fied. 


IDAFRBA determines the RBA of 
the next control interval. 


When the next RBA in sequance is 
in the next control area, 
IDAWRBFR prevents subsequent 
repositioning to a preceding 
control area for writing. 


For processing with shared 
resources, IDAGRB reads the 
index control interval that 
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69 


70 


71 


72 


73 


74& 


75 


76 


contains the current 
sequence~set record. 


When sequence~set pointers 
become invalid (because of a 
control-interval split or 
processing with shared 
resources), IDA019RC searches 
Nike sequence set for the currant 
ey. 


For processing without shared 
resources, IDAQ19R3 (I/0 
management) issues I/0 to read a 
sequence-set record. 


For processing without shared 
resources, IDAWAIT lets the I/0 
started in step 70 finish. 


Wihen the next RBA in sequence is 
in the next control area, 
IDAWRBFR prevents subsequent 
repositioning to a preceding 
control area for writing. 


For backward processing, 
IDAOD1LORV obtains the 
sequence-set record preceding 
the current sequence-set record. 


For processing with shared 
resources, IDAGRB obtains the 
next sequence-set record. 


For procassing without shared 
resources, IDA019R3 CIZ0 
management) issues I/0 to read 
the next sequence-set record. 


IDAWAIT lets the I/0 started in 
step 75 finish. 
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Support 

Recovery 
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IGCOOOS5E and IFGO551F ara 
End-of-Volume modules (for 
datails, see / 
Logic). 


IFGO550Y is an alias-name for 
IFGO2ZO0ON. It performs 
special processing for the 
catalog's ACB and is callad 
when End of Volume is called 
for a catalog. 


IFGO557A is an alias~name for 
IFGOL92ZA. 


IDA0557A is the VSAM 
End-of-Volume module. 


IDA0192C calls control 
Program catalog managament 
(LOCATE) to retrieve the 
volume time stamp from the 
volume entry. 


IDA0557B is the VSAM 
poo or vorune module number 


IDA0192C calls catalog 
management (LOCATE) to update 
the catalog for record 
management. 


IDADL9OZV ensures that the 
raquired volumes are mounted 
for the VSAM object. 


If the data set is stored on 
a mass storage voluma, 
IDA0192D stages (via a Mass 
Storage System ACQUIRE) the 
new volume to a direct-access 
storage device. 
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7A 


9A 


10 


Il 


12-13 


14-15 


IDA0557X extends a VSAM data 
sat cataloged in an ICF 
catalog. 


If the data set is stored on 
a mass storage volume, 
IDA0192D stages any new 
axtants to a diract-access 
storage davice. 


IDA0192V ensures that the 
required volumes are mounted 
for the VSAM object. 


IDA0192S writes SMF record(s) 
type 64. 


IDA0192C calls catalog 
management (LOCATE and 
UPDATE) to locate and update 
information in the object's 
catalog record. 


Whenever End of Volume 
detects an error, IDA0192P 
issues a diagnostic message 
and traces VSAM control 
blocks if the Generalized 
Trace Facility (GTF) is 
active. 


IDAOCEAL runs as an ESTAE 
exit when an error occurs in 
Open. It logs system 
information and returns to 
the I70 support recovery 
routine to continue with 
termination. 


IDAOCEA2 locates and frees 
storage used for VSAM data 
sets in the system queue area 
and the common service araa. 
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0 IDA019RO 









1 IDAOI9SRI 
2 IDAO19SN 


3 IDAOI9RZ 
IDAFREEB 






4 IDAO19RZ 
IDASBIF 


IDAOI9R2 


Figure 40. 


Notes for Figure 40 


IDA019RO is the VSAM record 
management interface module. 
resides below the 16-megabyte 
virtual storage line and 
interfaces between the VSAM user 
and the VSAM record management 
modules that are located above 
the 1l6-megabyte virtual storage 
line. IDA019RO receives control 
from the TERMRPL macro and 
passes control to IDA0N19R1. 


It 


IDAO19SN releases all commonly 
shared VSAM resources owned by 
the terminated RPL. 


MVS/XA VSAM Logic 
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5 IDAOI9SE 
IDARSTRT 
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TERMRPL Processing 
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IDAFREEB frees the index buffer 
Cif the RPL is for a KSDS). 


IDASBF subtracts excess data 
buffers. 


IDARSTRT attempts to restart all 
deferred synchronous requests 
not in the tarminated address 
space. 


IDAO19SN disconnects the PLH. 
IDA019R1 sets a condition code 


in register 15 and raturns to 
caller. 
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1 IDAOLSRI 






2 IDAOI9SG 


3 IDAWAIT 
4 IDAOL9ORB 











6 IDAFREEB 







8 I1GX00006 


9 SVC 26 





[s 


Figure 41. CNVTAD ProcessingConvarts Key/RBA/RRN to Volume 
Serial and RBA 
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Notes for Figure 41 6 IDA019SG frees the buffer 
IDAO19RB gotten for the index 
' 1 When the CNVTAD macro is search. 
invoked, IDA019R1 is called to 
validate request options and 7 For an ESDS, the RBA is 
parameter list. returned; for an RRDS, the RBA 
is calculated. 
2 IDAOD19R1 calls IDA019SG to 
convert the parameter list 8 IGX00006 (SVC109) is called to 
CIDACNVPL) arguments to RBAs and obtain volume serials for each 
volume serials. RBA. 
3 IDA019SG WAITs for previous I/0 9 IGX00006 issues SVC 26 to 
to be completed. "LOCATE’ the voluma sarials. 
& IDAOLORB is called for index 10 IDA019SG returns to IDAO19R1. 


search on keyed requests. 
11 IDAO19R1 returns to the user. 
5 The index record is searched to 
obtain an RBA for the base data 
record. 
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Figure 42. AC@QRANGE Processing—Stages a Range of Data from a 


VSAM Data Set 





L¥26-3907-1 


© Copyright IBM Corp. 


1974,1985 


J 


J 


C 


C 





Restricted Materials of IBM 
Licensed Materials — Property of IBM 


Notes for Figure 42 
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When the ACQRANGE macro is 
invoked, IDA019R1 is called to 
validate request options and 
parameter list. 


IDA019R1 calls IDA019SH to build 
an RBA pairs list CIDARBAPL) 
consisting of keys/RBAs/RRNs 
describing ranges of data. 


IDAOLORZ is called to WAIT for 
previous I/0 completion. 


IDA019RB is called to retrieve 
the starting key. 


IDA01L9ORC is called to retrieve 
the ending key. 
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10 


IDAO1LORZ is called to gat next 
index record, if necessary. 


IDAO19RZ is called to free the 
buffers. 


IDAMSSIF is called to issue SVC 
109 routing code 6 to acquire 
the data cylinders corresponding 
to the pairs of RBAs. 


When IDAO019SH regains control 
after the acquire, IDA019SH 
returns the IDAACQPL, ECB WAIT 
list pointer, RPERREG, and 
RPLERRCD to IDAO19R1. 


IDAO019R1 WAITs or returns to 
user. 
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8 IDAQO19SK 





MNTACQ Processing——Mounts a Volume and Stages VSAM 
Records into It 


Figure 43. 





LY26-3907-1 © Copyright IBM Corp. 1974,1985 


J 


J 


C 


C 


Restricted Materials of IBM 
Licensed Materials ~ Property of IBM 


Notes for Figure 43 
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When the MNTAC@ macro is 
invoked, IDAO19R1 is called to 
validate request options and 
parameter list. 


IDA019R1 calls IDA019SL to mount 
the volume indicated by the 
parameter list. 


IDA019SL calls IDAEOVIF to mount 
the volumes. 


IDA019SL calls IDAMSSIF to issue 
SVC 109 to acquire the data 
cylinders corresponding to the 
pairs of RBAs. 


IDAMSSIF locks the AMBxXs to 
prevent EOV from running during 
the acquire. 


IDA0192E is called to WAIT for 
previous I/O completion. 


IGX00006 (SVC 109 routing code 
6) 1s called and retrieves the 
volume serial numbers of the 
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10 


volumes specified by the RBA 
pairs. 


IGX00006 calls IDAO192ZE to 
acquire the data cylinders by 
converting RBAs or RBA pairs to 
cylinder axtents and to build an 
acquire parameter list and ECB. 


IDA0192E calls IDA019SK to sort 
cylinder extents into ascending 
sequence. If it is not a 
virtual device, the WAIT list is 
posted with successful 
completion and return to caller. 
If it is a virtual device, SVC 
126 is called for acquire with 
deferred response. 


IDAOD19ZE returns and passes the 
ECB WAIT list to IDAO1YISL. 


IDAO019SL returns to IDAO019R1 to 
WAIT or return to user. For a 
description of IHX00006, 
IDAOD1L92E, and IDA019SK, see 
OS/VS2 MVS Mass orage 
Extensions Logic: MSS 
Communicator (MSSC). 
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Figure 44. CHECK Processing~—WAITs and POSTs ECBs 
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When the CHECK macro is 

invoked, IDA019R1 is called to 4 
validate request options and 

parameter list. 


If the previous request was 
CNVTAD, MNTACQ, and ACQRANGE, 
control passes to RICHKMSS; 
otherwise, continues a normal 
CHECK with RICHECK. 


RICHKMSS provides CHECK 
function and internal 
synchronization for requests 
that specify SYN. 


RICHKMSS calls IDA019SM to do 
WAIT processing. IDA019SM 9 
WAITs on ECBs if any are not 
posted complete, sets 
RPLERREG/RPLERRCD from the ECB 


6-8 
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completion code, and releases 
the ECBs and WAIT list. 


IDA019SM calls IGX00006 to free 
ECBs. 


IGX00006 calls IDAOQ192E to 
process FREEMAIN request. 
FREEMAIN is issued for groups 
of ECBs if all are posted 
complete. 


RICHKMSS provides RICHECK 
function for CNVTAD, MNTACQ, 
and ACQRANGE. It calls IDASBF 
to subtract excess buffers and 
IDALOCEX to find error exits 
and IDAEXITR to take the exit. 


IDA019R1 returns to user. 


For a description of IGX00006 
and IDA0192E, see OS/VS2 MVS 
Mass Storage System Extensions 
Logic: MSS Communicator (MSSC). 
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Figure 45. ENDRE@ Processing—WAITs, POSTs; and Frees ECBs 
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When the ENDREQ macro is 
invoked, IDA019R1 is called to 
validate request options and 
parameter list. 


IDAO19R1I calls IDAOL1ORP, the 
ENDREQ processing module. 


If previous request was MNTAC®@ 
or ACQRANGE, IDAOLORP calls 
IDAOD19SM to WAIT for I/0 
completion. 


IDA019SM WAITs on the ag if 
any are not posted, seat 
RPLERREG/RPLERRCD from the ECB 
post code. 


IDAO019SM calls IGX00006 to free 


ECBs. 


IGY00006 calls IDAO0192E to 
process FREEMAIN request. 
FREEMAIN is issued for groups of 
ECBs if all ara posted complete. 


ENDRE@ processing for buffer 
flushing and error exits 
continues on return to IDA019RP 
from IDA019SM. 


IDAODI9SRP returns control to 
IDAOISRI. 


IDAO019RP returns control to 
user. For a description of 
IGX00006 and IDA0192E, sea 
OS/VS2 MVS M S 
xtensi ic: 
Communi r_ (MSS 
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Post Status Routine 
(See Figure 47) 
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Figure 46. I/0 Management: Translating Virtual Addresses to 
Real Addresses and Completing a Channel Program for 
I/0 
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Notes for Figure 46 


1 Buffer management requests I/0 
management to read or write data. 
IDAM19R3 prepares for 
supervisor~state processing and 
passes a request on to IGC121. 


2 IGC121 chains together the CPAs 
required for the request and 
determines whether the RBAs of 


records or control intervals in the 


request are covered by the extent 


definition blocks CEDBs) that exist 


for the data set. IGC121 builds 


lists of virtual and real addresses 
for use by the channel program that 
the I/0 supervisor will execute to 


do I/0. 


3 The PGFIX routine fixes in real 
storage the virtual pages that 


contain the buffers required to do 


the I/0. 


4 The PGFREE routine releases pages 
that have been fixed itn real storage 
in the case where an error occurs in 
virtual-to-real address translation 
and IGC121 cannot continue with the 


request. 


5 IDA1L21A2 completes the segments of 


channel programs passed to it by 


IGCi21 (or by the auxiliary storage 
manager, which enters I/0 management 


at IDA121A2) and chains them 
together to form a single channel 
program for use by the I/0 
supervisor. 


6 IECSCR1 converts the physical-record 
number in the first channel program 
segment into a sector value for use 


with devices having rotational 
position sensing. 


7 The basic I/O supervisor receives a 
STARTIO request from IDA121A2. It 


schedules the I/0 and returns to 
IDA121A2. 


LY26~-3907-1 
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12 


13 


14 


15 


After I/0 completion, the I/0 
supervisor post status routine 
determines whether the I/0 was 
successful and decides which VSAM 
end appendage should get control. 


The recovery termination manager 
gets control when an error occurs in 
the control program. If a 
functional recovery routine has been 
set up to get control in case of an 
error, the recovery termination 
manager gives control to it. 


IDA1L2Z1F2 is the functional recovery 
routine for IDA1L2Z1A2. It frees 
pages fixed in real storage by 
IGC121, releases the local lock that 
IDA121A2 obtains for storage 
protection, and issues an SDUMP 
macro to record information in 
SYS1.DUMP. 


See step 9 note. 


IDA121Fl1 is the functional recovery 
routine for IGC121. Its processing 
is similar to that described in step 
10 note. 


When IDAM19ORS defers a request 
because End of Volume is processing 
and the request requires that the 
processing be completed or that End 
of Volume do other processing for 
the request, IDADRQ awaits an 
indication that End of Volume is 
finished. 


IDAEOVIF handles a request from 
IDAMLOR3S for End-of-Volume 
processing. IDAMI9R3 expects End of 
Volume to create an EDB to cover 
some RBA in the request from buffer 
management. 


See step 9 note. 


PIODFRR is the functional recovery 
routine for IDAMI19R3. It releases 
the local lock that IDAM19R3 may 
have obtained for storage protection 
and issues an SDUMP macro to record 
information itn SY51.DUMP. 
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Basic 1/O 

Supervisor ) 
1 1/O Supervisor 
Post Status Routine 


3 SMFIOCNT 
4 IECVQCNT 
§ POST Routine 


6 Stage II Exit 
Effector 


. 8 IECVQCNT 


9 PGFREE Routine 





















10 Recovery Termination 
Manager 


12 F3FRR 


13 IDA121A4 ) 
14 SMFIOCNT 
1§ IECVQCNT 


16 POST Routine 


17 Stage II Exit 
Effector 











18 IDA121A5 


19 IECVQCNT 
20 PGFREE Routine 


21 Recovery Termination 
Manager 


22 IDA121F4 






Figure 47. I/0 Management: Processing after I/0 Supervisor 
Completes 1/70 
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Notes for Figure 47 


1 After I/0 completion, the I/0 
supervisor post status routine 
datermines whether the I/0 was 
successful and decides which VSAM 
end appendage should get control. 


2 IDA121A3 indicates I/0 completion 
in the BUFCs and does 
housekeeping following successful 
I/0 and provides for the caller 


of I/0 management to get control 
back. 

3 Call to SMFIOCNT to record block 
counts (I/0) and device connect 
time. 

& When I/0 activity is being 


allowed to continue to 
completion, but no new I/0 is 
being started (for quiescing the 
task), IECVQCNT decrements the 
count of outstanding I/0. (CWhen 
the count is reduced to 0, the 
task can be closed down.) 


5 For a synchronous request, the 
POST routine indicates in an ECB 
that I/0 has completed. 


6 For an asynchronous request or 
for a synchronous request when 
End of Volume is waiting to 
process, the Stage II exit 
effector schedules IDA121A5. 


7 IDA121A5 itself gets control 
asynchronously in relation to the 
end appendage to give control 
back to the requester of I/0 or 
to End of Volume. 


& See step 4 note. 
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ll 


12 


13 


14 


15-21 
22 


The PGFREE routine releases pages 
fixed in real storage by IGCi21. 


The recovery termination manager 
gets control when an error occurs 
in the control program. Ifa 
functional recovery routine has 
been set up to get control in 
case of an error, the recovery 
peter een manager gives control 
o it. 


IDA121F3 is the functional 
recovery routine for IDA1214A3. 
It duplicates the processing of 
IDA121A3, tn order to continue 
processing if possible. 


F3FRR is a functional recovery 
routine within IDA121F3. It 
frees pages fixed in real storage 
by IGC121 and issues an SDUMP 
macro to record information in 
SYS1.DUMP. 


IDA121A4% indicates completion in 
BUFCs whose I/0 completed and 
error in the BUFC whose I/0 
failed. It retries I/0 that yet 
has a chance to complete 
successfully. It does 
housekeeping and provides for the 
caller of I/0 management to get 
control back. 


Call to SMFIOCNT to record block 
hab €I/0) and device connect 
ime. 


See notes for steps 4 through 10. 


IDA121F4 is the functional 
recovery routine for IDAIZ1A4. 

It frees pages that were fixed in 
real storage by IGC121 and issues 
an SDUMP to record information in 
S$YS1.DUMP. 
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DIRECTORY 
This directory identifies the method of operation diagrams and 
program organization compendiums for the modules and external 
procedures of VSAM. The module directory and the external 
procedure directory contain the same information, ordered 
differently. 
MODULE DIRECTORY 
The module directory is organized alphabetically by symbolic 
module name. It lists the module's descriptive name, its 
external procedure names Cexternal entry points), the component 
to which it belongs, and the method of operation diagrams and 
program organization figures that refer to it. 
The components ara identified by: 
Cc Close 
C/R Checkpoint/restart 
CBM Control block manipulation 
EOV End of volume 
II ISAM interface 
TOM I/0 management 
0 Open 
RM Record Management 
External Method of Program 
Module Descriptive Procedure Operation Organization 
Name Name Names Component Diagrams Figures 
AMDUSRF9 IMDPRDMP format IMDUSRF9 — = — 2 
appendage 
IDACKRA1L ESTAE IDACKRA1 C/R caer eee 17,18 
IDAICIAL ISAM-interface: data~set IDAICIAI II AG 11 
management recovery 
routine 
IDAIIFBF ISAM interface: FREEDBUF IDAIIFBF II BU2 — 
processing 
IDAIIPM1 ISAM interface: QISAM IDAIIPM1 II BU1 —e 
load-mode processing 
IDAIIPM2 ISAM interface: QISAM IDAIIPM2 II BUL — 
scan-mode processing 
IDAIIPM3S ISAM interface: BISAM IDAIIPM3 II BU2 — 
processing 
IDAIISM1L ISAM interface: SYNAD IDAIISM1 II BU2 — 
processing 
IDAMLORS Problem<state I/0 driver IDA019R3 IOM BG1,BS1,BS2, 20,22,38,46 
BS3,BS4,DAl1, 
DA2,DA3 
PIODFRR IOM DAl 46 


2 
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Module 
Name 


IDAOCEA1 


IDAOCEA2 


IDAOCEA4 


IDAOA05B 
IDAOCO5B 


IDAOCO6C 
IDAOI96C 
IDA019C1 


IDAO19RA 
IDAO19RB 


IDAO19RC 


IDA01L9RD 
IDAO19RE 


IDA019RF 


IDAOLORG 


TDA019RH 


IDA019RI 


IDA019RJ 
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Descriptive 
Name 


Data-set management 
recovery routine (force 
close executor 

Task close executor 


BLDVRP/DLVRP ESTAE 
routine 


Restart 


SSCR and initial DEB 
processing 


Checkpoint 
SSCR build and cleanup 


Control block 
manipulation 


Direct record locate 


Index search 


Search compressed index 
block 


DD DUMMY processing 


Control~interval split 


Control-area split 


Index create 


Index insert 


Index upgrade 


Split index record 


External 


Procedure 


Names 
IDAOCEAI 


IDAOCEA2 


IDAOCEA4 


IDAOA5B 
IDAOCO5B 


IDAOCO6C 
IDAOT96C 
IDA019C1 


IDAO19RA 
IDA019RB 


IDAOLORC 


IDAOQ19RD 


IDAOQ1ORE 


IDAREPOS 
IDAO1ORF 


IDAO1LSRG 


IDAIST 


IDA019RH 


IDAIVIXB 
IDASPACE 
IDAIXCHK 
IDAO19RI 


IDAHLINS 
IDANEWRD 
IDAOI9ORJ 


1974,1985 


Component 
O/C/EOV 


0/C/EOV 


O/C/EOV 


C/R 
C/R 


C/R 
C/R 
CBM 


RM 
RM 


RM 


RM 


RM 


RM 
RM 


RM 


RM 


RM 


RM 
RM 
RM 
RM 


RM 
RM 
RM 


Method of 
Operation 
Diagrams 


AF,AG 


AH1,AH2,AHS3 
AF,AG 


AJ,AL1,AL2 
AK 


AI,AJ 
AJ 
CA,CB1,CB2 


BC,BE,BH1,BJ 


BC,BH1,BH8, 
BJ,BM 


BC,BH1,BH2, 


BH6,BI,BJ, 
BM,BS4 


BH1,BH3,BH7 


BH1,BH2,BHS, 
BH4,BH5 


BG1,BG2,BG3, 
BG4,BG5,BK2 


BG3,BG4,BG5, 
BH9 


BH3,BH6,BH7, 
BH8 


BH4,BH5,BH7, 
BH8,BH9 


BH4 
BH4 


BH4,BH7,BH8, 
BH9,BH10 


Program 
Organization 
Figures 
8,10,11,12, 
16,39 

8,39 


10,16 


18 
18 


17 
17 


20,21,22,24 
22,34 


22,24,25,32 


24,25,27,28, 
32 


24,25,26,27, 


3» 


26,29,350,31 
29,30 


27,32,33,34 


28,33,34 


28 
28 
34 
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Module 
Name 


IDAOL9RK 


TDAOL9ORL 
IDA019RM 


IDAOI9RN 


IDAOLIRO 
IDAOL9RP 


IDAO19RQ 


IDAOL9RR 


IDAO19RS 


IDAO19RT 


Descriptive 
Name 


Preformat 


Data modi fy 


Data insert 


Indexing subroutines 


Verify 
ENDRE@ and JRNAD 


Relative record 
subroutines 


Relative record driver 


Spanned record data 
modi fy 


Spanned record data 
insert 
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External 
Procedure 
Names Component 
IDAR RM 
IDAWR RM 
IDAOL9RK RM 
IDAO19SRL RM 
IDA019RM RM 
IDACHKKR RM 
IDAO19RN RM 
IDAAQR RM 
IDAER RM 
IDARELIR RM 
IDA019RO RM 
IDA019RP RM 
IDAENDRQ = RM 
IDAPFREE RM 
IDAPGETM RM 
IDAPTCBYV RM 
IDATJXIT RM 
IDAUPXIT RM 
IDA019RQ RM 
IDAO019RR RM 
IDAGXCTL RM 
IDARRDRL RM 
IDAO19RS RM 
IDAADSEG RM 
IDAMVSEG RM 
IDAOLORT RM 
IDADARTV RM 
IDAJRNSR = RM 
LY26-3907-1 


Method of 
Operation 
Diagrams 
BG5,BH9,BH10 
BG4,BG5,BH10 
BG2,BH4,BH8, 
BH9,BK2,BN2, 
BO1 

BH2,BI 


BE,BF,BH1, 
BH2,BHS 


BG3,BG4,BG5, 
BH8,BH9 


BG5 

BM 
BK1,BK2 
BK1,BK2 


BN1,BN3 


BO1,BO02 


BC,BD,BJ,BO1 


BJ,BO1 
BH2,BI 


BH1,BH2 
BH1,BH2 
BE,BF,BH1 


BC,BD 
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Figures 

30 

30,31 


24,26,28,29 


24, 25 


24,25,26, 
27,28,46 


29,30,33,34 


30 


20,21,24,25, 
26,27,35,38 


35 


23,25,35 


23,35 
24,25 


24,25 
24,25 
24 


20,21 


1974,1985 
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7 External 
Name Name Nanes 
IDASPNPT 
IDAO19RU Alternate-index upgrade IDAO19RU 
driver 
IDAXGPLH 
IDAQ19RV Locate previous TIDAO19SRV 
sequence-set record 
IDAADVPH 
IDARVRS1 
IDAOLSRW Buffer management, IDAO19RW 
part 2 
IDAABF 
IDAAIBF 
IDAFRBA 
IDAGWSGW 
IDAOLORX Path processing driver IDAOLORX 
IDAFRSHR 
IDAGETWS 
IDARELWS 
IDARXBD 
IDASHINX 
IDAODLORY Shared resources buffer IDAO19RY 
management 
IDAQ19RZ Buffer management IDAOLORZ 
interface 
IDABNC1 
IDAEXCL 
IDAFREEB 
IDAGNFL 
IDAGNNFL 
IDAGNXT 
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Component 
RM 
RM 


RM 
RM 


RM 
RM 
RM 
RM 
RM 
RM 


RM 
RM 
RM 
RM 
RM 
RM 
RM 
RM 


RM 


RM 
RM 
RM 


RM 


RM 


RM 


Method of 
Operation 
Diagrams 


BC,BD,BE, 
BH1,BI,BR 


BB1 


BD 


ar 


BH4 


BN3,B51,B5S2, 
BS4 


BQ 


BP1,BP2,BP3, 
BS1,BS2,DA1 


BC,BS1,BS2, 
BS4 


BC,BD,BE, 
BG1,BG5,BH3, 
BH4¢,BH5,BM, 
BN1,BN2,BN3, 
BO1,B02,BS1, 
BW 


BG3,BH3,BH8 
BE,BF,BGI, 
BG4¢,BH4,BH5, 
BN2,BO1 


BC, BD, BH4, 
BN1,B01 


Program 
Organization 
Figures 


37 


28 


21 

38 

38 
28,355,358 
38 

22,38 


38 
36 


38 


38 


aurea 


38 


20,21,22, 
23,24,26, 
27,28,30, 
33,34,355, 
38,40 


29,30,33, 
34,38 
24,26,27,28, 


5,3 


20,211,235, 
28,35,38 
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Module 
Name 


IDA019R0 
IDA0O19R1 


IDAO19R2 


IDAO19R4 


IDA019R5 


IDA019R8& 


IDA019SA 


300 


Descriptive 
Name 


31 bit support interface 


Decode and validate 


Buffer management, 
part 1 


Keyed/addressed request 
driver 


I/O-error analysis 


Control-interval 
processing 


Control-interval 
initialization—create 
entry-sequenced data set 
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External 
Procedure 
Names Component 
IDAGRB RM 
IDAGWSEG RM 
IDAINVAL RM 
IDAGXU RM 
IDAMRKBF RM 
IDARLXU RM 
IDASBFE RM 
IDASCHBF RM 
IDAWAIT RM 
IDAWRBFR RM 
IDAWRTBF RM 
IDAWRTBR RM 
IDA019RO RM 
IDAOLORI RM 
IDA019R2 RM 
IDA019R4 RM 
IDAO19R5 RM 
IDALOCEX RM 
IDAEXEX RM 
IDAEXITR RM 
IDAO019R8 RM 
IDA019SA RM 
LY26-3907-1 


Method of 
Operation 
Diagrams 


BC,BE,BH1, 
BH3,BH4¢,BH5, 
BH9,BH10,BJ, 


BM,BN1,BO1, 
BS2,B5S3 


BE,BH5,BK1, 
BN1,BN2, BW 


BS2,BS3,BS4 
BE,BG2,BH3, 
BH4¢,BH5,BH8, 
BH9,BK1,BK2, 


BN2,BN3,B01, 
BO2 


AD7,BB1,BK1, 
BK2,BL 


BS1,BS2,BS3, 
DA1 


BC,BD,BE, 
BF,BH1,BH3, 
BQ, BR 


BB3,BK1,BL 


BK1,BL 
BM,BN1,BN2 
BN3S 


BE,BF,BG1, 
BG2,BG3,BK2 
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Program 
Organization 
Figures 
21,22,23; 
27,28,33, 


34,35,38, 
46,48 


38 


38 


22,2/7,28, 
35,38,40, 50 


38 
22,38,47,48 
20,24,25, 


26,27,28, 
32,35,38,40 


38 
20,21,23,40 
12,14,20,21, 


23,24,35,36, 
41542543544, 
45 


38,40 


20,21,22,24, 
25,36,37 


38 
44 
38 


26,29,30 


1974,1985 


9 


J 


J 


C 
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Module 
Name 


IDA019SB 


IDA019SC 


IDA019SD 


IDAO19SE 


IDAO019SF 


IDA019SG 


IDA019SH 


IDA019SK 


IDA019SL 


IDA019SM 


IDAO19SN 
IDAO19ST 
IDA019SU 
IDA019SV 


IDA019SW 


LY26-3907-1 


Descriptive 
Name 


Dynamically build 
channel program area for 
shared resources 


Space manager 


Delete index entry 


I/O error service 


routines 


Control-area 


split-spanned records 


Convert keys/RRNs to 


RBAsS 


Acquire a range of 
keys/RBAs/RRNS 


Sort acquire list 


extents 


Mount volume and acquire 


Check and ENDRE@ support 
for MNTACQ/ACQRANGE 


request 


Terminate RPL 


Trace 


R/M trace I/0 


Validate cross-memory 


mode 


SRB mode routines 


© Copyright IBM Corp. 


External 


Procedure 


Names 
IDA019SB 


IDAO139SC 
IDAPTSPC 
IDA019SD 
IDAERKEY 
IDAOI19SE 


IDADR@ 


IDAEOVIF 


IDAGOCMP 
IDAGOIRB 
IDAGOSRB 
IDARSTRT 
IDAO19SF 


IDA019SG 


IDA019SH 


IDA019SK 


IDAO19SL 


IDA019SM 


IDA019SN 
IDA019ST 
IDA019SU 
IDAO19SV 


IDA019SW 
IDATIME 


1974,1985 


Component 
RM 


RM 
RM 
RM 
RM 
RM 


RM 


RM 


RM 
RM 
RM 
RM 
RM 


RM 


RM 


RM 
RM 


RM 
RM 
RM 
RM 


RM 
RM 


Method of 
Operation 
Diagrams 


BI 


BI 


BB3,BE,B01, 
BP1,BP3,BS2, 
BV,DA1,DA2, 
DA4 


BP1,BP3,BS2, 
DA1 


BE,BG2,BN2, 


BO1,DA1,DA2, 
DAS 


BW 
BH4 


BX1 


BX3 


BX2 


BW 
BVI 


BV2 


Program 
Organization 
Figures 
25,26,28,29, 


34,35,38,39, 
40,46 


24,35,38, 
46,49,52 


26,28,29,34, 
46,49 


40 
28 


41 
42 
43 
43 


44,45 


40 
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Module 
Name 


IDA019S1 


IDA0195S2 


IDA0195S3 


IDA0195S4 
IDA019S6 
IDA0195S7 


IDA0195S8 


IDA0192A 


IDA0192B 


IDA0192C 


IDA0192D 


IDA0192E 


IDA0192F 


IDA0192G6 


IDA0192I1 


IDA0192M 
IDA0192P 


TIDA01925$ 


IDA0192V 


Descriptive 
Name 


Improved 
control-interval 
processing driver 


Fast path I/0 driver 


Improved 
control-interval 
processing——I/0 
management 


Disabled exit routine 
Control interval rebuild 


Control block update 
facility 


Control block update 
facility support 
routines 


VSAM open string 


Open a cluster 


Catalog interface 


Stage/destage 
CACQUIRE/RELINQUISH) 


Stage by RBA or RBA 
range CACQUIRE) 


Open base cluster, path, 
and upgrade alternate 
index 


Data-space security 
verification 


ISAM interface: 
processing 


open 


Virtual-storage manager 


VSAM open/close/EOV: 
problem determination 


VSAM open/close/EOV: SMF 
record build 


Volume mount and verify 
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External 
Procedure 
Names Component 
IDA019S1 RM 
IDA019S2 RM 
UPADWAIT RM 
IDA019S3 RM 
IDA019S4% RM 
IDA019S6 RM 
IDA019S7 RM 
IDACBUF RM 
IDAUCBV RM 
IDAATECK RM 
IDA019S8 RM 
IDASVCX RM 
IDA0192A 0 
IDA0192B 0 
IDA0192C 0 
IDA0192D O/C/EOV 
IDA0192E — 
IDA0192F 0 
IDA0192G 0 
IDA0192I II 
IDA0192M O/C/EOV 
IDA0192P 0 
IDA01925 0 
IDA0192V 0 
LY26-3907-1 
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Method of 
Operation 
Diagrams 


BN1,BN3 


BN1,BN3 


BC,BD,BH3 


AC1,AC2,AC7, 
AG 


AC4,AL1 
AC2,AC4,AD6, 
AD7,AE2,AL1, 
BT1 


AD6,AE2,BT2 


AC3,AC4,AC5, 
AC6 


AC1,AC7 


AL2 


AD5,AD6,AE¢, 
AH3 


AC7,AD6,AE2 


AC3,BT1 
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Figures 


5,6,7,11 
8,18 
5,6,8,12, 
14,15,18,39 
8,12,14,18, 
39 


43-45 


8,18 
15 


8,10,16 
8,12,14,18, 
39 


8,12,14,39 


5,8,18,39 


1974,1985 
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Module 
Name 
IDA0192W 
IDA0192X 
IDAOL92Y 
IDA01922 


IDA0195A 
TDA0200B 


IDA02008 


IDA02Z00T 


IDA0231B 
IDAO231T 


IDAOS57A 
IDA0557B 
IDA0557X 
IDA121A2 


IDA121A3 


IDA121A4 


IDA121A5 
IDA121A6 
IDA121CV 


TEFVAMP 


IFGO192A 


LY26-3907-1 


Descriptive 
Name 


Channel~program-area 
build 


VVDS manager interface 
routine 


String build and 
shared-resource 
processor 


Control=block build 


VSAM SNAP format routine 


Close a cluster 


ISAM interface: close 
processing 


VSAM close string 


Close (TYPE=T) a cluster 


VSAM close (TYPE=T) 
string 


VSAM end-of-volume 
VSAM end-of-volume 2 
VSAM ICF extend 


Actual block processor 


Normal end appendage 


Abnormal end appendage 


Asynchronous routine 
Purge routine 


Communication vector 
table CIEZABP) 


AMP parameter 
interpreter 


VSAM O/C/VEOV string load 


Cinterface between the 


control program and VSAM 


0/C/EOV) 


IBM 


External 
Procedure 
Names 


IDA0192W 


TDA0192X 


TDA0192Y 


IDA0192Z 
IDA0195A 
IDAOZ00B 


IDA0200S 


IDAOZO00T 


TDA0231B 
IDAOZ351T 


TDAOS57A 
IDA0557B 
IDA0557X 
TIDA121A2 
IDA121F2 
IDA1L21A3 
FSFRR 
IDA12Z1F3 
IDAUPAD 
IDA121A4 
IDA121F4 
TIDA121A5 
IDA121A6 


IEFNB902 


IFGOL92A 
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Componant 
0 


07c 


0 
O/C/EOV 
C 


It 


EOV 
EOV 
EOV 
IOM 
TOM 
TOM 
TOM 
TOM 
TOM 
TOM 
10M 
IOM 
IOM 
TOM 


0/C/EOV 
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Diagrams 


AC1,AC4 


AC1,AC4,AC5, 
ADS,AF1,AHS, 


AL|,AL 
AC46,AL1 


AD1,AD3,AD4, 
AD6 


AD1,AD? 


AD1,AD2,AD3, 
AD4,AD5,AD7 


AE1,AE2 
AE1,AE2 


BTi,BT2 
BT1,BT2 
BT2 


DA2Z,DAS,DA4% 


DAS 
DA4 
DA4 
DA4 
DAS 
DA5 
DA5 
DA4,DA5 


AF 


Program 
Organization 
Figures 


8,10 


12 


14 
14 


39 
39 
39 
46 
46 
47 
47 
47 
47 
47 
47 
47 
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External Method of Program 
Module Descriptive Procedure Operation Organization ) 
Name Name Names Component Diagrams Figures 
IFGO19Z2Y BLDVRP/DLVRP load IFGO192Y O/C/EOV = 10,16 
routine 
IGC121 ape nor acene I/O IGC121 IOM DA1,DA2,DA3 46 
river 
IDA121F1 IOM DA2 46 
IGX00006 VSAM MSS support SVC TGX00006 _ — 41,43-45 
IGX00029 VSAM CBUF SVC IGX00029 RM =— — 


J 
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OCEDURE DIR ORY 


>XTERNA 


Procedure 


Name 
F3FRR 


IDAABF 


IDAADSEG 


IDAADVPH 
IDAAIBF 
IDAAQR 


IDAATECK 


IDABNCI 


IDACBUF 
IDACHKKR 
IDACI96C 


IDACKRA1 


IDADARTV 
IDADRQ 


IDAENDR@ 
IDAEOVIF 


IDAER 


IDAERKEY 
TDALOCEX 
IDAEXCL 
IDAEXEX 
TIDAEXITR 
IDAFRBA 
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Module 
Name 


IDA121A3 


IDA019RW 


IDA019RS 


IDA02Z1RV 
IDA019RW 
IDA019RN 


IDA0195S7 


IDAO19RW 


IDA01987 
IDA019RM 
IDAODI96C 


IDACKRA1 


IDAO19RT 
IDAO19SE 


IDA019RP 
IDA019SE 


IDA019RN 


TDA019SD 
IDAO19R5 
IDAO19RZ 
TDA019R5 
IDAO19R5 
IDAO19RW 


Descriptive 
Name 


Functional recovery routine (of 
IDA121F3) 


Buffer management: add buffer to 


placeholder (¢PLH) 


Insert a spanned-record-segment 
entry into a sequence-set record 


Advance placeholder backwards 
Add insert buffer to chain 


Split index record: assign RBA to 


the index record 


Determines if add to end of key 
range or split 


Establish a new CI in the buffer 
pool 


Update the VSI 
Check key for proper key range 


Free VSAM checkpoint/restart 
storage 


Checkpoint/restart: ESTAE 


Retrieve a spanned record 


Data Insert: defer the request 
until the device is available 


ENDREQ request 


Data insert: interface to VSAM 


end-of-volume 


Index create: erase dummy entry 
from the index record 


Erase index entry from index record 


Determine which exit to take 
Exclusive control 

Exit to user exception routine 
Exit to user routine 


Buffer management: determine next 
RBA for sequential processing 


1974,1985 


Method of 
Operation 
Diagrams 


DAS 
BHS 
BH1,BH2 


BD 


BG3,BG4,BG5, 
BG8, BH9 


AJ,AL2 
AJ,AK,ALI, 
AM 


BC, BD 
BP1,BP3,BS2, 
DAl 


BK1,BK2 
BE,BG2,BN2, 
BO1,DA1,DA2, 
DA4 


BG5 


BK1,BL 
BN3,BS1,BS2, 
BS4 


Program 
Organization 
Figures 

47 

28,35,38 
24,25 


21 
38 
29,30,33,34% 


17,18 
17,18 


20, 21 
24,35,38,46 


31 
26,28,29,34, 
46 


30 


38 
38 


22,38 
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Name 
IDAFREEB 


IDAFRSHR 


IDAGETWS. 


IDAGNFL 


IDAGNNFL 


IDAGNXT 


IDAGOCMP 
IDAGOIRB 
IDAGOSRB 
IDAGRB 


IDAGWSEG 


IDAGWSGW 


IDAGXCTL 
IDAGXU 


IDAHLINS 
IDAICIA1 


IDAIIFBF 
IDAIIPM1 


IDAITIPM2 


IDAIIPMS 
IDAIISM1 
IDAIST 


IDAINVAL 
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Module 
Name 


IDAODLORZ 


IDAO19RW 


IDAO19RX 
IDAOLIRZ 


IDAOD1L9RZ 


IDADLSRZ 


IDA019SE 
IDAGISSE 
IDAQOLSSE 
IDAOL9RZ 


IDA019RZ 


IDA019RW 


IDAO19RR 
IDA019RW 


IDA019RI 
IDAICIAI 


IDAIIFBF 
IDAIIPM1 


IDAIIPM2 


IDATIPMS 
IDAIISM1 
IDAO1LIRG 


IDAO19RW 


MVS/XA VSAM Logic 


Restricted Mater{als of IBM 


Licensed Materials ~ Property of IBM 


Descriptive 
Name 


Free a buffer 


Releases the index if it had been 
obtained for shared use 


Get working storage 


Buffer management: obtain an empty 
buffer 


Buffer management: obtain next 
empty buffer for the placeholder 
Buffer management: obtain next 
buffer in sequence 

Cross-memory post 

Call EOV 

Schedule IRB for EOV 


Buffer management: obtain the 
Su eeer that contains the speci fied 


Get a work segment (for shared 
resources) 


Gat a work segment 


Get exclusive control 


Get axclusive usa of an already 
owned buffer 


Insert antry into index-set record 


ISAM interface: 
recovery routine 


ISAM interface: FREEDBUF processing 


ISAM interface: load-mode 


processing 


ISAM interface: 
processing 


ISAM interface: 
ISAM interface: 


QISAM scan-mode 


BISAM processing 
SYNAD processing 


Index create: insert entry into 


index record 


Invalidate buffer contents 


LY26-3907-1 


data-set management 


Mathod of 
Operation 
Diagrams 
BC,BD,BE, 
BG1,BG5,BH3, 
BH4,BH5,BM, 


BN1,BN2,BNS, 
BO1L,BO2,BS1 


BGS, BHS,BH3 


BE,BF,BG1, 
BGS4,BH4,BHS5, 
BN2,BOl 


BC, BD, BH4, 
BNL,BOL 


BC,BE,BH1, 
BH3,BH4,BH5, 
BH9,BH10,BJ, 
BM, BN1,BO1, 
BS2,BS3 


BH4 
AG 


BUZ 
BUI 


BUI 


BU2 
BU2 
BG3,BG4,BG5, 
BH9 
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Figures 
20,21,22,23, 


24,25,27,28, 
oer aeeaee 


29,50,355,354, 
38 


24,26,27,28, 


? 


20,21,25,28, 
35 38 


21,22,23,27, 
28,335,354,38 


38 


38 


28 
11 


29,30 
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Procedure Module 


Name 
IDAIVIXB 


IDAIXCHK 


IDAJRNSR 
IDAMRKBF 
IDAMVSEG 
IDANEWRD 


IDAOCEAI 


IDAOCEA2 
IDAOCEA4 
IDAPFREE 
IDAPGETM 


IDAPTCBV 
IDAPTSPC 
IDAR 
IDARELIR 
IDARELWS 
IDAREPOS 
IDARLXU 


IDARRDRL 


IDARSTRT 
IDARVRS1 
IDARXBD 
IDASBF 


IDASCHBF 
IDASHINX 


IDASPACE 
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Name 


IDAO19RH 


IDAO19RH 


IDAOLIRT 
IDA019RZ 
IDAO19RS 
IDAO19RI 


IDAOCEA1 


IDAOCEA2 
IDAOCEA4 
IDA019RP 
IDA019RP 


IDAO1L9RP 
IDA019SC 
IDAOI9RJ 
IDAO19RN 
IDA019RX 
IDAOI19RE 
IDAOLIRW 


IDAO19RR 


IDAO19SE 
TDAOLORV 
TIDA019RX 
IDAO19RZ 


IDAO19RZ 
IDAO19RW 


IDA0Q19RH 
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Descriptive 
Name 


Index insert: invalidate buffers 
containing a copy of the modified 
index record 

Checks that there is room in the 
index record for any entry to 
become the last entry in the 
record. 

Journal a spanned-record segment 
Mark a buffer 

Move a segment 


Initialize a new sequence-set 
record 


Data-set management recovery 
routine (force close executor) 


Task close executor 
BLDVRP/DLVRP ESTAE routine 
Free dummy ACB obtained by IDAPGETM 


Build dummy ACB with null function 
code 


Validate the current TCB 
Reclaim control interval 
Split index record: read the record 
Release an RBA for an index record 
Release working storage 


Reposition placeholder 


Release exclusive Use of an owned 
buffer 


Direct record locate for relative 
record 


Rastart 
Order buffers 
Increase working buffer length 


Buffer management: remove buffers 


from placeholder 
Share a buffer 


Obtains the index of a data set for 
shared use 


Check an index record to ensure it 
can be split 


1974,1985 


Mathod of 
Operation 
Diagrams 


BH1,BH2 
BHS 


AF,AG 


AH1,AH2,AH3 
AF,AG 


BG5,BH9,BH10 


BJ,BO1 


BE,BH5,BK1, 
B 2 


1,B 


Program 
Organization 
Figures 


38 
24, 25 
28 


8,10,11,12, 
16,39 


8,39 
10,16 


23,355 


38 


22,23,27,28, 
35,38 
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Method of Program 
Procedure Module Descriptive Operation Organization | 
Name Name Name Diagrams Figures 
IDASPNPT IDAGIORT Make an index entry for a — —_ 
spanned-record segment 
IDATJXIT IDAG1ORP Control-interval request: Take the BN1,BN3 20,21,24,25, 
Journal exit 26,27,35,38 
IDASVCX IDA019S8 Perform the VSI update on the = ae 
specified cluster 
IDATMSTP IDATMSTP Controls which data sets are AC4 — 
datestamp processed 
IDAUCBV IDA019S7 Update control blocks from the VSI — —_ 
IDAUPAD IDA121A3 User processing exit for request —_— — 
resumption 
IDAUPXIT IDAOLORP User processing routine CUPAD): —= = 
take UPAD, if present and active, 
and set up parameter list with 
common user information 
IDAWAIT IDA019RZ Buffer management: wait for BS2,BS3,BS4 22,38,41,42 
completion of I/0 operations 
IDAWR IDAO1LORJ Split index record: write the index BG4¢,BG5,BH10 30, 31 
record 
IDAWRBFEFR IDAO019RZ Buffer management: write the buffer BE,BG2,BH3, 20,24,25,26, 
BH4¢,BH5,BH8, 27,28,32,35, 
BH9,BK1L,BK2, 38 
BN2,BN3,BOl1, 4 
BO2 
IDAWRTBF IDAOLIYRZ Write a buffer — —= 
IDAXGPLH IDAGQ19RU Get a placeholder BB1 — 
IDAOAO05B IDAOA05B Checkpoint/restart: restart AJ,AL1,AL2 18 
IDAOCO5B IDAOCO5B Checkpoint/restart: SSCR and AK 18 
initial DEB processing 
IDAOCO6C IDAOCO6C Checkpoint/restart: checkpoint AI,AJ 17 
IDAOI96C IDAOI96C Checkpoint/restart: SSCR build and AJ 17 
cleanup 
IDA019C1 IDAO019CL Control block manipulation CA,CB1,CB2 — 
IDAO1LIORA IDAOLI9RA Direct record locate Beene 20,21,22,24 
IDA019RB IDAO19RB index search BC,BH1,BH8, 22734 
BJ,BM 
IDAODLORC IDAO019RC Search compressed index block BC,BH1,BH2, 22224,25,32 
BH6,BI,BJ, 
BM, BS4 
IDAO01L9RD IDA019RD DD DUMMY processing — oa 
IDAON19RE IDAOLORE Control-interval split BH1,BH3,BH7 eo pcerecuees 
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Name 
IDAO19RF 


IDAO1IRG 


IDAO19RH 


IDAO19RI 


IDAO19RJ 


IDAO19RK 


IDAO19RL 


IDA019RM 


IDAO19RN 
IDA019RO 
IDA019RP 
IDAD19RQ 
IDAO19RR 


IDA019RS 
IDAOL9RT 
IDA019RU 


IDAO19RV 
IDA019RW 
IDA019RX 
IDA019RY 


IDAO19RZ 


IDA019R1 


IDAO19R2 


IDA019R3 
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Name 
IDA019RF 


IDAO19RG 


IDA019RH 


IDAO1IRI 


IDAOLIRJ 


IDAO19RK 


IDAO19RL 


IDA019RM 


IDAC19IRN 
IDA019RO 
IDAO19RP 
IDAOD19RQ 
IDAO19RR 


IDAO19RS 
IDAOLORT 
IDAOL9RU 


IDAO19RV 
IDA019RW 
IDA019RX 
IDAO19IRY 


IDA019RZ 


TIDA019R1 


IDAO019R2 


IDAM19R3 
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Descriptive 
Name 


Control-area split 
Index create 

Index insert 

Index upgrade 
Split index record 


Preformat 


Data modi fy 


Data insert 


Indexing subroutines 

Verify 

ENDREQ and JRNAD 

Relative record subroutines 


Relative record driver 


Spanned record data modify 
Spanned record data insert 


Alternate-index upgrade driver 


Locate Previous sequence-set record 
Buffer management, part 2 
Path processing driver 


Shared resources buffer management 
Buffer management interface 


Record management: request decode 


and validate 


Buffer management, part 1 


I/0 management: problem-state I/0 
driver 


1974,1985 


Method of 
Operation 
Diagrams 


BH1,BH2,BH3, 
BH4, BH5 


BG1,BG2,BG3, 
BG4,BG5,BK2 


BH3,BH6,BH7, 
BH8 


BH4,BH5,BH7, 
BH8,BH9 


BH4,BH7,BH8, 
BH9, BHLO 


BG2,BH4¢,BH8, 
BH9,BK2,BN2, 
BO1 

BH2,BI 


BE,BF,BH1, 
BH2,BH3S 


BM 
BK1,BK2 
BO1,B02 


BC,BD,BJ, 
BOL 


BH2,BI 
BE,BF,BH1 


BC,BD,BE, 
BHI,BI,BR 


BQ 


BP1,BP2,BP3, 
BS1,BS2,DA1 


BC,BS1,BS2, 
BS4 


AD7,BB1,BKI1, 
B L 


od 


BS1,B52,BS3, 
DAI 


BG1,BS1,BS2, 
BS3.BS4,DAl1, 
DA2,DAS 
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Figures 


24,25,26,27, 
33,34 


? 


26,29,30,31 
27,32,33,34 
28,33,34 

34 


24,26,28,29 


24,25 


24,25,26,27, 
28, 46 


35 
23,25,35 


24,25 
24 
37 


28 
38 
36 
38 


38 
12,14,20,21, 
23,24,35,36 
38 


20,22,38,46 
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Name 
TDA019R4 


IDA019R5 
IDA019R8 


IDAO19SA 


IDA019SB 


IDA019SC 
IDA019SD 
IDAO19ISE 


IDA019SF 
IDA0195SG 
IDA019SH 
IDA019SK 
IDA019SL 
IDA019SM 


IDA019SN 
IDA019SV 
IDA019SW 
IDA01951 


IDA019S2 
IDA0195S35 


IDA019S4 
IDA01956 
IDA019S7 
IDA019S8 


IDA0192A 


IDA0192B 


310 


Module 
Name 


IDA019R4 


IDA019R5 
IDA019R8 


IDA019SA 


IDAO19SB 


TIDA019SC 
IDA019SD 
IDAO19SE 


IDA019SF 
IDA0195SG 
IDA019SH 
IDA019SK 
IDAO19SL 
TDA019SM 


IDA019SN 
IDAO19SV 
IDA019SW 
IDA019S1 


IDA019S2 
IDA019S3 


TIDA01954 
IDA019S6 
IDA0195S7 
IDA019S8 


TDAO192A 


IDA0192B 
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Descriptive 
Name 


Keyed/addressed request driver 


I/O error analysis 
Control-interval processing 
Control-interval 
initialization-create 


entry-sequenced data set 


Dynamically build channel program 
area for shared resources 


Space manager 
Delete index entry 


I/0 error service routines 


Control-area split-spanned records 
Convert keys/RRNs/RBAs to RBAs 
Acquire a range of keys/RBAS/RRNs 
Sort acquire list extents 

Mount volume and acquire 


CHECK and ENDREQ support for MNTAC@ 
and ACQRANGE request 


Terminate RPL 
Validate cross-memory mode 
SRB mode routines 


Improved control-interval 
processing driver 


Fast path I/0 driver 


Improved control-interval 
processing-I/0 management 


Disabled exit routine 
Control interval rebuild 
Control block update facility 


Control block update facility 
support routines 


VSAM open string 


Open a cluster 


Method of 
Operation 
Diagrams 
BC,BD,BE, 
BF,BH1,BH3, 
BQ, BR 
BB3,BK1,BL 
BM,BN1,BN2,> 
BN3S 


BE,BF,BG1, 
BG2,BG3,BK2 


BB3,BE,B01, 
BP1,BP3,BS2, 
BV,DA1,DA2, 
DA4 

BH4 

BX1 

BX3 


BX2 


BW 


BN1,BN3 


BN1,BN3S 


BC,BD,BH3 


AC1,AC2,AC7, 
AG 


AC4,AL] 
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Figures 
20,21,22,24, 
25,36,37 


38 


26,29,30 


25,26,28,29, 
grag 
28 

41 

42 

43 

43 

44,45 


40 


5,6,7,11 


8,18 
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Procedure 


Name 
IDA0192C 


IDA0192D 


IDA0192E 
IDA0192F 


IDA0192G 
IDA0192I1 
IDA0192M 
IDA0192P 


IDA01925S 


IDA0192V 
IDA0192W 
IDA0192X 
IDA0192Y 


IDA0192X 
IDA01922 
IDA02Z008B 


IDA02005S 
IDAO2Z00T 


IDA0231B 
IDA0231T 
IDA0557A 
IDA0557B 
IDA0557X 
IDAI21A2 


IDA121A35 


IDA121A4 
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Module 
Name 


IDA0192C 


IDA0192D 


IDA0192E 
IDA0192F 


IDA0192G 
IDA0192I 
IDA0192M 
IDA0192P 


IDA01925 


IDA0192V 
IDA0192W 
IDA0192X 
IDA0192Y 


IDA0192X 
IDA0192Z 
IDA02008B 


IDA0200S 
IDA0200T 


IDA0231B 
IDA0231T 
IDA0557A 
IDA0557B 
IDA0557X 
IDA1L21A2 


IDA121A3 


IDA121A4% 


Descriptive 
Name 


VSAM open/close: catalog interfaca 


Stage/dastaga CACQUIRE/RELINQUISH) 


Staga by RBA or RBA range CACQUIRE) 


Open base clustar,path,and upgrada 


alternate indax 

Data-space security verification 
ISAM interface? open processing 
Virtual storage manager 


VSAM opan/close/EOV: problem 
determination 


VSAM opean/close/EQV: SMF racord 
build 


Volume mount and verify 
Channel-program~area build 

VVDS manager protocols 

String build and sharad-resource 
processor 

VVDS manager interface routine 
Control block build 


Close a cluster 


ISAM interface: close processing 


VSAM close string 


Closa (TYPE=T) a cluster 
VSAM close (TYPE=T) string 
VSAM end-of-volume 

VSAM end-of-volume 2 

VSAM ICF extend 


I/Q management: actual block 
processor 


I/0 management: normal end 
appendage 


I/O management: abnormal end 
appendage 
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Method of 
Operation 
Diagrams 
AC2,AC4,AD6, 
AD7,AE2,AL1, 
BT1l 


AD6,AE2,BT2 


AC3S,AC4,AC5, 
AC6 


AL2 
AC1,AC7 


AD5,AD6,AE2, 
AH3 
AC7,AD6,AE2 


AC3,BT1 
AC1,AC4 


a 


AC1,AC4,AC5, 
AD5,AF1,AH3S, 
AL1,AL2 


AC4,AL1 
AD1,AD3,AD4, 
AD6 


AD1,AD7 


AD1,AD2,AD3, 
AD4¢,AD5,AD7 


AE1,AE2 
AE1,AE2 
BT1,BT2 
BT1,BT2 

BT2 
DA2,DA3,DA4% 


DA4 


DA5 


Program 


Organization 


Figures 


5,6,8,12, 
14,15,18,59 


8,12,14,18, 
39 


43-45 
8,18 


15 
7 
8,10,16 


8,12,14,18, 
39 
8,12,14,39 


5,8,18,59 


8,10 
8 


8,10,12,14, 
6,18 


8,18 
12 


11 
12 


14 
14 
39 
39 
39 
46 


47 


47 


Directory 311 


Procedure Module 


312 MVS/XA VSAM Logic 


Name Name 
IDA121A5 IDA121A5 
IDA121A6 IDA121A6 
IDA121F1 IGC121 
IDA121F2 IDA121A2 
IDA121F3 IDA121A53 
IDA121F% IDA121A4 
ITEFNB902 IEFVAMP 
IFGO192A IFGO192A 
IFGO0192Y IFGO192Y 
IGC121 IGC1i21 
TGX00006 TGX00006 
IGX00029 IGX00029 
IMDUSRF9 AMDUSRF9 
PIODFRR IDAM19R3 
UPADWAIT IDA019S2 
MODULE PACKAGING 
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Method of Program 
Descriptive Operation Organization 
Name Diagrams Figures 
I/0 management: asynchronous DA4,DA5 47 
routine 
I/0 management: purge routine = — 
Functional recovery routine DA2 46 
Functional recovery routine DAS 46 
Functional recovery routine DA% 47 
Functional recovery routine DA5 47 


AMP parameter interpreter — — 


VSAM open/close/EOV string load AF 5 
Cinterface between the control 1 
program and VSAM O/C/EOV) 


BLDVRP/DLVRP load routine —_ 10,16 


I/0 management: supervisor state DA1,DA2,DA3 46 


I/0 driver 

VSAM MSS support SVC —= 41,43-45 
VSAM CBUF SVC — — 
IMDPRDMP format appendage os — 


Functional recovery routine DA1 46 
User processing exit for request oe — 
resumption 


Most VSAM modules reside in pageable virtual storage; some 
I/O-management modules reside in the nucleus. The following 
table lists the VSAM load modules and transients that are 
resident in the SVCLIB or LPALIB library or in the nucleus. 
Those in the libraries are loaded into the pageable supervisor 
or link-~pack area by nucleus initialization (NIP) at initial 
program load (IPL). Those in the nucleus are link-edited there 
when the system is generated. 
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Record Management 


Name Description 


IDAO19L1 Main record management 


VSAM Modules 


IDAMI9R3, 
IDAO19RE, 
IDAO1SRI, 
IDAO19RM, 
IDA019RQ, 
IDAO19RU, 
IDAOLORY, 
IDAOI9RG, 
IDA0195S7, 
IDA019SD, 
IDAQ19SH, 
IDAGI9ST, 


IDAG19RA, 
IDAO19RF, 
IDAO19RJ, 
IDAO19RN, 
IDAO19RR, 
IDAOIIRV, 
IDAO19RZ, 
IDAO19R5, 
IDA01958, 
IDAO19SE, 
IDAO19SL, 
IDAOQ19SU, 


IDA019S1 IDA019S2 


Open/Close/End of Volume and Checkpoint/Restart 


IDA0192A Open/Close/End of Volume IDACKRAIL, 
IDAODI9I6C, 
IDA0192D, 
IDA0192M, 
IDA0192W, 
IDAO2ZOOB, 
IDA0231T, 
ISAM Interface 
IDAIIFBF FREEDBUF IDAIIFBF 
IDAIIPM1 QISAM load IDAIIPM1 
IDAIIPM2 QISAM scan IDAIIPM2 
IDALIPM3 BISAM IDAIIPM3 
IDAIISM1 SYNAD IDAIISM1 
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IDAOAOSB, 
IDA0192A, 
IDA0192F, 
IDA0192P, 
IDA0192X, 
IDA02005S, 
IDA0557A, 


IDAOQ1ORB, 
IDAOL9IRG, 
IDAO19RK, 
IDA019RO, 
IDAO19RS, 
IDAO19RW, 
IDA019RI, 
IDA019R8, 
IDA019SA, 
IDAO1ISF, 
IDA019SM, 
IDAGI1ISV, 


IDAOCOSB, 
IDA0192B, 
IDA0192G, 
IDA0192S, 
IDA0192Y, 
IDA0200T, 
IDA0557B, 


IDAO19RC, 
IDAO19RH, 
IDAQI9IRL, 
IDAO19RP, 
IDAO1ORT, 
IDAOQ19RX, 
IDA019R2, 
IDA01956, 
IDA0195C, 
IDA0195G, 
IDAO19SN, 
IDA019SW, 


IDAOCO6C, 
IDA0192C, 
IDA0192I, 
IDA0192V, 
IDA01922, 
IDAO231B, 
IDA055?7X 


Directory 313 


1/0 Managemant 


Name 
IDAML9RS 


IDAO19SB 


IDA019S4 
IDAI21A2 
IDAL21A5 
IDA121A4 
IDA121A5 
IDA121A6 
IDA12Z1CV 


IGCi2i 


Description 

Problem-state I/0 driver 
puta for shared resources, 
Disabled axit routine 

Actual block processor 
Normal end appendage 
Abnormal and appendage 
Asynchronous routine 

Purge routine 


Communication vector table 
C(IEZABP) 


Supervisor~state I/0 driver 


Control Block Manipulation 


IDA019C1 


Control block manipulation 


VSAM Transient Routine 


IFGO192A 


VSAM open/close/end of volume 


loader 


Miscellaneous Routines 


AMDUSRF9 
IDAOLORD 
IDAO019RO 
IDAO195A 
IEAVNP16 
IEFVAMP 
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IMDPRDMP format appendage 
DD dummy 


Record management interface 
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VSAM Modules Jo 


IDAMLORS Cpackaged in main record 
management IDAO0LILL) 


IDA019SB (nuclaus) 


IDA019S4¢ (nucleus) 
IDAI2Z1A2 (nucleus) 
IDA121A3 (nucleus) 
IDA121A4 (nucleus) 
IDA121A5 (nucleus) 
IDA12Z21A6 Cnuclaus) 
IDA12Z1CV Cnucleus) 


IGC121 (nucleus) 


IDA019C1 


IDAICIAL, IDAOCEAL, IDAOCEA2, IDAOCEAG, 
IFGO192A 


AMDUSRF9 
IDAO19RD Cnucleus) 
IDAOD19RO Cnucleus) 


VSAM SNAP format routine IDAOI95A 
NIP VSAM open IEAVNP16 Cnucleus) 
AMP parameter interpreter IEFNBO2Z 
2 
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DATA_AREAS 


VSAM RECORD 


CONTROL INTERVAL 


"Data Areas" describes a VSAM data set and index and their 
record formats. It also describes each VSAM control block and 
shows the relationships between VSAM control blocks. 

Listings (microfiche) has a "Symbol Where Used Report"™ that 
lists alphabetically all the symbols used in VSAM modules, along 
with all the modules that use them. 


VSAM DATA SET FORMAT 


A VSAM data set is a collection of records grouped into control 
intervals. Control intervals are grouped into larger units 
called control areas. The VSAM stored record, control interval, 
and control area are described in the following sections. 


VSAM records are ordered according to key, in the case of a 
key-sequenced data set; according to when the records were 
stored, in the case of an entry-~sequenced data set; or according 
to record numbers that serve as keys, in the case of a relative 
record data set. 


Data records are put in the low-address portion of the control 
interval. Control information about each data record is put in 
the high-address portion of the control interval. The 
combination of a data record and its control information, though 
they are not physically adjacent, is called a stored record. 


In a key-~sequenced or entry-sequenced data set, records can be 
variable in length and can span control intervals. Each segment 
of a spanned record is stored in its own control interval. 


A control interval is a continuous area of auxiliary storage 
that VSAM uses for storing records. The control interval is the 
unit of information that VSAM transfers between virtual and 
auxiliary storage. 


The length of each control interval is an integral multiple of 
block size. The size of a control interval is determined by the 
system from the size of the records, user-specified minimum 
buffer size, device characteristics, and the user-speci fied 
percentage of free space. The user can specify the size of the 
a interval, but it must be within limits acceptable to 


Figure 48 on page 316 shows the format of a control interval. 
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Free Space 












rel 7 7 


When a data set is created, records are put into control 
intervals. 


Figure 48. Control Interval Format 


For an entry-~sequenced data set, records are ordered according 

to when they were stored in the data set. The first record to 

be stored, therefore, has the lowest RBA. A control interval is 
filled until there is insufficient space in it for the next 

record. Records are always added at the end of an 
entry-~sequenced data set. ) 


For a key-sequenced data set, records are ordered according to 
key. Records of a key-sequenced data set are put into control 
intervals; the percentage of free space specified is reserved in 
each control interval and in each control area for use by 
records to be added to the data set. As records are added to 
the data set, records that have higher keys are moved to higher 
se coors the free space within the control interval is 
reduced. 


Distributed free space is used to simplify the insertion of 
records. If there is enough free space in the control interval 
to accommodate the record to be inserted, higher-keyed records 
are moved within the control interval to keep the records in key 
sequence. 


If the space needed for directly inserted records is greater 
than the amount of free space available in a control interval, 
the control interval is split: VSAM moves some of the stored 
records (data records and their control information) to an empty 
control interval in the same control area. For mass insert 
(sequential insert at the end of a control interval), the 
percentage of free space defined by the user is maintained. 


When a control interval has reached its defined packing factor, 
a new control interval is obtained. No data is moved. 


Note that it is possible for the physical sequence of records to 

be different from their key sequence after control-interval 

splits. The sequence will be according to key in each control 
interval, but the control intervals involved in the split need 

not be adjacent. Thus, it is possible to have 1-2-3, 4-5-6, 

9-10, 7-8 in each of four control intervals. The sequence-set 

index records, however, reflect the key sequence. ) 


For a relative record data set, records are ordered according to 


their relative record number. Each control interval has as many 
fixed-length slots as will fit Cand allow room for control 
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information). If each control interval has ten slots, the first 
control interval has slots for relative records 1 through 10, 
the second for 11 through 20, and so on. 


RDF~—Record Definition Field 


The record definition field (RDF) describes a record, record 
slot, or record segment within the control interval. RDFs are 
put into the control interval right to left so that the 
Leone RDF describes the leftmost data record. The format of 
he RDF is: 


Offset Bytes and 
Dec (Hex) Bit Pattern Description 
0¢0) 1 Control field: 
Ke. Indicates whether there is (1) or isn't (0) a paired RDF 


o e KM oo ee 


1¢1) 2 


to the left of this RDF. 
Indicates whether the record spans control intervals: 


00 No. 

01 Yes. This is the first segment. 

10 Yes. This is the last segment. 

11 Yes. This 18 an intermediate segment. 


Indicates what the 2-byte binary number that follows this 
control field gives: 


0 The length of the record, segment, or slot described 
by this RDF. 

1 The number of consecutive unspanned records of the 
same length, or the update number of the segment of a 
spanned record. 


For a relative record data set, indicates whether the slot 
described by this RDF does (0) or doesn't (1) contain a 
record. 


. XX Reserved. 


Binary number: 


° When bit 4 in the control field is 0, gives the length 
of the record, segment, or slot described by this RDF. 

e When bit 4 in the control field is 1 and bits 2 and 3 
are 0, gives the number of consecutive records of the 
same length. 

e When bit 4 in the control field is 1 and bits 2 and 3 
are not 0, gives the update number of the segment 
described by this RDF. 


CIDF—Control Interval Definition Field 


In an entry-sequenced data set, when there are unused control 
intervals beyond the last one that contains data, the first of 
the unused control intervals contains a CIDF filled with 0s. In 
a key-sequenced or relative record data set, or a key-range 
portion of a key-~sequenced data set, the first control interval 
in the first unused control area Cif any) contains a CIDF filled 
with Os. A control interval with such a CIDF contains no data 
Or eats space, and is referred to as the "Software End of File 
v 
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The control interval definition field (CIDF) describes the 
control interval. The format of the CIDF is: 


tes and 5 
t Pattern Field Name Description 


CIDFOSET The displacement from the beginning of the 
control interval to the beginning of the 
unused space, or, if there is no unused space, 
to the beginning of the control information. 
This number is equal to the length of the data 
(records, record slots, or record segment). 

In 3 control interval without data, the number 
is 


CIDF11 The length of the unused space. This number 
1s equal to the length of the control interval 
minus the length of the control information, 
minus the 2-byte number in the preceding 
field. In a control interval without data 
(records, record slots, or record segment), 
the number is the length of the control 
interval, minus 4 (the length of the 
CIDF-——-there are no RDFs). Ina control 
interval without unused space, the number is 


CIDFBUSY Set on for CI split interruption and set off 
when interruption complete. 


A control area consists of control intervals; the number of 

control intervals in a control area is determined by VSAM. The 
control area is the amount of space that VSAM preformats so that 

data integrity is ensured for records added to a data set. ~ 


Control areas are also used to simplify and localize the 
movement of records when records are inserted in a key-~sequenced 
data set. If an insertion requires a free control interval and 
there isn't one, a control~area split results. VSAM establishes 
a new control area and moves the contents of approximately half 
of the full control area to free control intervals in the new 
control area. The new records, as their keys dictate, are then 
inserted into one of the two control areas. 


S) 
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INDEX FORMAT 


There are two types of indexes in VSAM: the prime index of a 
key-sequenced data set, and alternate indexes of aither a 
key-sequenced or an entry~sequenced data set. 


A key~sequenced data sat is a cluster composed of a data 

component, which contains thea control intervals that contain 
data records, and an index component, which contains the control 
intervals that contain the records of the prima index. 


An alternate index is itself a key~sequenced data set. Its data 
component contains index records that give the location of data 
records within its base cluster (the key~sequenced or 
entry~sequenced data set for which it is the alternate index). 


FORMAT OF RECORDS IN A PRIME INDEX 


L¥26-3907-1 


The format of records in the index component of a key-~sequenced 
cluster is fully compatible with the format of VSAM data 
records; that is,» index records, regardless of their level 
within the index, are treated by record-management modules in 
the same way that any other VSAM record is treated. Each index 
record and associated control information resides in an index 
control interval. Figure 49 shows the basic format of an index 
control interval. The RDF and CIDF fields are described under 
"Control Interval" earlier in this chapter. 


Control Information 


a. 


Index Record 





Figure 49. Index Control Interval Format 


Figure 50 shows an expansion of the record portion of the index 
control interval. 





V— 


Free Data- Index 
Controk Entries 
Interval 

Pointers 


Figure 50. Index Record Format 


The header portion of the index record contains, for example, 
the information required to insert index entries, to locate 
entries within the index record, and to convert pointers within 
entries to RBAs. The free data-control-interval pointers are 
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used to locate data control intervals that have not yet been 

used; these entries exist only in sequence-set index records. 

Both the index entries and the free data-control-interval 

pointers are placed in the index record from right to left, as ) 
indicated in the figure. 


Index entries are grouped into sections. When an index entry is 
to be located, the search for it begins at the section level. 
The high-key entry of each section is examined to locate the 
section that contains the specified entry. VSAM determines the 
number of sections on the basis of the total number of entries 
Within the tndex record. Figure 51 shows the index antry 
portion of the index record divided into sections. 


Index Entries Index Entries Index Entries 





Figure 51. Index Entries Grouped into Sections 


The parts of an index record (header, free data-control-interval 
pointers, and entry sections) are described in the following 
paragraphs. 


Index Record Header J 


The format of the index record header 1s: 


Offset Bytes and 
Dec (Hex ) Bit Pattern Field Name Description 


0€0) 2 IXHLL Length, tn bytes, of the index record, 
including this field. Equals control-interval 
length minus 7. 


2¢2) 1 IXHFLPLN Length, in bytes, of the control information 
(the IBFLPF, IBFLPL, and IBFLP3 fields) in 
each index entry. 


3(3) 1 IXHPTLS Langth of the vertical pointers in this index 
record. In the sequence set, vertical 
pointers point to data control intervals; in 
the index set, they point to index control 
intervals in a lower level of the index?. 

This field is used as a mask for insert 
character (store character) under mask 
instructions that are used to access pointers. 
The value contained in this field specifies 
the langth of these pointers, as follows: 


X'O01"' i1-byte pointer 
X'03* 2@-byte pointer 
X'07' 3=-byte pointer 


1 Pointers vary in length to conserve index space. For 
example, if the number of items to be referenced is less 
than 256, a l-byte pointer is used; if the number is greater 


than 256, a 2-byte pointer is used; and if the number is 
greater than 65,536, a 3-byte pointer is used. 
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Offset 
Dec(Hex) 


( 4(4) 


8(8) 
2(C) 
6¢10) 


17(11) 
18¢€12) 


20¢14) 


22(16) 


Bytes and 
Bit Pattern Field Name Description 


4 


Hp 


IXHBRBA For a sequence-set index record, the RBA of a 
data control area that contains data to be 
referenced. This RBA and index-entry pointers 
are used together to calculate the 4-byte RBA 
of another index record or of a data control 
interval. 


IXHHP Pointer to the logically next index record in 
this index level. (Horizontal pointer. ) 

IXHXX Reserved (0). 

IXHLV Index level number. A sequence-set index is 


assigned a value of 1; the next higher-level 
index is assigned a value of 2; etc. 


IXHFLGS Reserved (0). 


IXHFSO Displacement from the beginning of this record 
to the space available for inserting index 
entries. For higher-level indexes, the entry 
space immediately follows the record header; 
for sequence-set indexes, the entry space 
follows the record header and free 
data-control-interval pointers. 


IXHLEO Displacement from the beginning of this record 
to the last (high-key) entry in the index 
record?. (The leftmost entry.) 


IXHSEO Displacement from the beginning of this record 
to the last (Chigh-key) entry in the first 
section in the index record*. (The leftmost 
entry in the first section.) 


Free Data-Control-iInterval Pointers 


C 


Free data-control-interval pointers, which exist only in 
sequence"set index records, are used to calculate the RBAs of 
available data control intervals. The length of a pointer is 
specified in the record header. 


VSAM always uses the rightmost free data-control-interval 
pointer when a data control interval is needed. The value of 
the pointer is set to 0 when the control interval is used. As 
pointers are sat to 0, the displacement to space that is 
available for index entries (contained in the record header) is 
adjusted by the length of the free data-control-interval 
pointer. In this way, space used by free data-control-interval 
pointers is made available for index entries when the pointers 
are no longer required. 


2 This displacement is to the IBFLPF (front-key compression 
count) byte of the entry, not to the beginning of the entry. 
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Index Entries 
The format of an index antry is: ) 


Length 
(in Bytes) Field Name Description 


Variable IXKEY Key characters that determina the sequence of records in 
a key-~sequenced data set. 


1 IBFLPF Front-key compression count, that is, the number of 
characters by which the beginning of the key has been 
compressed. 


I IBFLPL Length of the IXKEY field. 


1-3 IBPLP3 Pointer to an index or data control interval. The 
length of the pointer is specified in the record header. 


The last Chigh key) index entry in each index level is a dummy 
entry: It contains no key characters and the IBFLPF and IBFLPL 
fields are set to 0. The pointer in this entry is used to 
calculate the RBA of the last control. 


Each segment of a spanned record has its own entry ina 
sequence~set index record. Only the leftmost entry (the entry 
for the last segment) contains the IXKEY field. In all the 
other entries, IBFLPF contains the spanned record's key length, 
and IBFLPL contains 0. 


Index-Entry Sections 


Index entries are grouped into sections. A section is defined 
by a 2-byte field that precedes the high-key index entry. This 
2-byte field links a section with a higher-keyed section. This 
field contains the displacement from the IBFLPF field of the | 
high-key entry in this section to the IBFLPF field of the 
high-key entry in the next higher-key section. Figure 52 shows 
how these pointers work. Section 1 indicates the number of 
bytes between the high-key entry in section 1 and the high-key 
entry in section 2; section 2 indicates the number of bytes 
between the high-key entry in section 2 and the high-key entry 
in section 3; etc. 


yp pl 
Figure 52. Index-Entry Section Pointers 


When the index is searched, the high key of each section is 
examined to locate the section that contains the specified 
entry. When the section that contains the entry is found, it is 
searched. 


When an index is originally built, the sections within a record 
usually contain the same number of entries. As index entries 

are added and deleted, however, the number of entries per 

section varies. All of the entries for the segments of a 

spanned record are grouped into the same section. 
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FORMAT OF RECORDS IN AN ALTERNATE INDEX 


. The index component of an alternate index is the same as the 
index of any key-sequenced data set. The data component, too, 
is the same in form: data records, which can be spanned, are 
stored in control intervals, and control intervals are grouped 
into control areas. 


A data record in an alternate index contains: 
e Header information 


e A key field that contains the alternate key of tha basa 
cluster over which the alternate index is defined 


e One or more pointers to data records in the base cluster 
that contain the alternate key in the alternate-index 
record's key field 


In an alternate index defined with unjque keys, data records are 
fixed in langth-~they contain only one pointer to a base record. 
In an alternate index defined with nonunique keys, data records 
are variable in length~—-they can contain more than one pointer 
to base records. 


A pointer to a record in an entry~sequenced base cluster is an 
RBA pointer. It gives the location of the base record by RBA. 
A pointer to a record in a key-~sequenced base cluster is a 
prime-key pointer. That is, it identifies the base record by 
its prime key. VSAM uses the prime-key pointer to go to the 
index of the key-sequenced base cluster to find the base 
record's location. 


The format of a data record in an alternate index is: 


Offset Bytes and : 
Dec(Hex) Bit Pattern Field Name Description 
We Header 
0¢0) 1 AIXFG Flags that indicate what kind of pointer (s) 
the record contains: 
.0 RBA pointer(s). 
Bear toto Prime-key pointer(s). 
XxxXXX XXX. Reserved. 
1¢1) 1 AIXPL Length of a pointer. An RBA pointer is 4 
bytes long. A prime-key pointer is as long as 
the prime key of the key-saequenced base 
cluster. 
2(2) 2 AIXPC Number of pointers in the record. 
404) 1 AIXKL Length of the key field in the record. The 


length is the same as the length of the 
alternate key field in base records. (That 
is, the key field in an alternate-index record 
is not compressed.) 


C 
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Key Field 

5(€5) VL AIXKY The key field of the record. It contains the 
alternate key of the base record(s) governed 
by the record. 

Pointer(s) 

VL VL AIXPT A pointer to a base record. This field is 
repeated for each base record that contains 
the alternate key in AIXKY. 

ONTRO Ss 


Figure 53 on page 325 and Figure 54 on page 326 show the VSAM 
control blocks built when a Key-sequenced data set is opened. 


The role of the BIB and CMB in virtual-storage management is 
aa under "Virtual-Storage Management™ in "Diagnostic 
a Ss. 


J 
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Note: The data control block structure is shown in Figure 58 on page 332. Thea 


index control block structure is shown in Figure 60 on page 334. 


Figure 53. VSAM Control Block Structure for a Key-Sequenced Data Set (VSAM User) 
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index control block structure is shown in Figure 60 on page 


Figure 54. 


Figure 55 shows how a VSAM cluster COURDATA) 


two subtasks (User#1 and User#2). 


User #1, 


VSAM routines. 


deleted. 


closes it, 


the VSAM routines are deleted. 
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The data control block structure is shown in Figure Pewee page 332. The 


VSAM Control Block Structure for a Kay-Sequenced Data Set CISAM User) 


is shared between 
When the cluster is opened by 
VSAM control blocks are built to describe the cluster to 
When the cluster is opened by User#2, an AMBL is 
built to link User#2's ACB to the cluster's VSAM control blocks. 
When either subtask closes the cluster, 
When the last subtask that is sharing the cluster 

the VSAM control blocks that describe the cluster to 


the subtask's AMBL is 


cL 


2 
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Note: The data control block structure is shown in Figure 58 on page 332. The 
index control block structure is shown in Figure 60 on page 334. 


Figure 55. VSAM Data Set Control Blocks Before and After Data Set Sharing 
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Figure 56 shows the VSAM control blocks built when a 
key~sequenced data set (KSDS1) is opened for access through a 


path (PATH1). The path alternata index CAIX1) and a second 
alternate index CAIX2) are members of the upgrade set for KSDSIL. on 


J 
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Note: The base data control block structure is shown in Figure 58 on page 332. 


alternate-index data control block structure is shown in Figure 59 on page 333. 
index control block structure is shown in Figure 60 on page 334. 


through a Path 
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Figure 57 shows the sharing of VSAM control blocks when the 


key-sequenced data set (KSDS1) shown in Figure 56 is opened for 
access through a path (CPATH2) with the second alternate index 
CAIX2). AMBLsS are built to link User #2's ACB to AIX2 and 

KSDS1. When either user closes the path, the associated AMBLs 


are deleted. 


J 
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| | Data Control | 
{ 
ID for AIX2 | | 
t CMB Index | 
| Control Block 
+ BIB | Structure | 
t Base AMBL | CMB | 
Flag On = 1 | | 
ey eee eee ere rete oe J 


Note: 
Figure 58 on page 332. 
structure is shown in Fi 


block structure is shown in Figure 60 on page 334. 
BIB-UPT-RPL-ACB-upgrade AMBL structure (not shown) 


The base data control block structure is shown in 


The alternate-index data control block 

gure 59 on page 333. The ee control 
@ 

is the same 


as that in Figure 56 on page 329. 


Figure 57. 


Shared VSAM Control Block Structure for a 


Key-Sequenced Data Set Accessed through Two Paths 
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Figure 58 shows the control blocks that describe a cluster's 
data component set to VSAM record-management routines. 
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Note: The AMBL control block structure is shown in Figure 55 on page 327, Figure 56 
on page 329, and Figure 57 on page 331. The index control block structure is shown 
in Figure 60 on page 334. 


Figure 58. Data AMB Control Block Structure 
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Figure 59 shows the control blocks that describe an alternate 
index's data component to VSAM record-management routines. 
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index is a member of the upgrade set 
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Note: The base data control block structure is shown in Figure 58 on page 332. 
index control block structure is shown in Figure 60 on page 334. 


Figure 59. Alternate-Index Data AMB Control Block Structure 
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Figure 60 shows the control blocks that describe a key-~sequenced 
cluster's index component to VSAM record-management routines. } 
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Note: The AMBL control block structure is shown in Figure 55 on page 327, Figure 56 
on page 329, and Figure 57 on page 331. The data control block structure is shown 


in Figure 58 on page 332 
Figure 60. Index AMB Control Block Structure ) 
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Figure 61 shows the VSAM control blocks built for processing. 
with shared resources. These control blocks describe the VSAM 
resource pool. With global shared resources (GSR), they are in 
global storage. With local shared resources (LSR), all of them 
except the IOSBs, SRBs, and PFLs are in the user's address 
Spaca. For accessibility to the IOSBs, SRBs, and PFLs in case 
of a failure in the address space that contains the local 
SsbA pool, the ASCB and a chain of VGTTs give their 
ocation. 


C 
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Figure 62 shows the AMB control block structure for processing 


with shared resources. 
processing without shared resources, 


Figure 58, 
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Figure 59, and Figure 60. 
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LY26-3907-1 


o 


EB 


is 


DB 
tLPMB 


AMDSB 
tARDB 


BSPH 
tBUFC 


s 


OT 


PLHDR 
tPLH 


tIOMB 
tNext PLH 


=) 


Q 
Ss 


< 


SI 


© Copyright IBM Corp. 


LPMB 


ARDBs 


BUFC 
t Buffer 


IOMB 
tIOSB 
tPFL 


E 


eS 


tIRB 


RB 





1974,1985 





BUFC Buffer 


tNext BUFC | tBuffer 
+ Previous 
BUFC 


VGTT for Local 
Shared Resources 
Only (Adjacent 
to IOSB/SRB/ 
PFL) 


Fe 


AMB Control Block Structure with Shared Resources 





Data Areas 337 


Restricted Materials of IEM 
Licensed Materials ~ Property of IBM 


CONTROL BLOCK SUBPOOL ASSIGNMENT 


Subpool 230 in the high and of the user's private address space 
contains the DEBs, to be consistent with I/0 support and , 
checkpoint/restart. Subpool 245 in the system queve area (SQA, 

in global storage) contains the IOSBs and SRBs because I/0 
supervisor, running in any user's private address space, needs 
them in a place where it can always address them. Subpool 241 
contains ECBs for deferred response posting by MSS ACQUIRE. 

Subpool 252 in the low end of the private area contains the I/0 
control blocks that must be protected from user alteration 
(including alteration by record management). The AMBXN is not 

in subpool 252 (which has storage protection key of 0) because 

it contains fields from the AMB and the IOMB that record 
management needs to update. The AMBXN is in subpool 250, along 
with other unprotected control blocks, 


All control blocks for a catalog are kept in global storage, in 
either subpools 231 and 241 in the common service area (CSA) or 
subpool 245 in SQA. "Virtual-Storage Management" in "Diagnostic 
Aids" shows the subpools in which storage for particular control 
hlocks is indicated. 


CONTROL BLOCK FORMATS 


This section discusses VSAM control blocks and Cexcept for those 
adequately covered in the "Data Areas" microfiche) gives their 
format. DFP XREF Listings (microfiche) lists alphabetically all 
the symbols used in VSAM modules, in particular, the labels of 
the control blocks discussed here. With each symbol are listed 
all the modules that use it, along with a code that tells how 
each symbol is used: 


D defined 

R read (that is, referenced without alteration) 
W written (that is, altered) 

Cc compared 


J 
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TR BLOCK IDENT RS_ CROSS-INDEX 


C 


There are cases in which dumps provide only the ID of certain 

control blocks. The table below will help you easily identify a 

Seeger when all that is known from a dump is the control 
oc : 


Pa or ed 
Block Description Page 
rxroor | ar___ | Reauest Poreneter Uist SCO 
[xray | 88 | Bese Tnformation Block —*d; «SS 
Pxrir’ | ons | cluster Meneuenent Block «(S06 
penne [vat | vetia ambi tebe SSC*dSC 
rx | wit | Volume Mount Table =*d;CO 
Pxrisy | wes | Header Element Block Cd SRT 
rx | vsrT | VSAM shared Resource Table «| (423 
Pxriey | vior | vaita toms TebleSSC*d CRO 
rxni7” | vst | 5A" shared Information Block + ¢21_ 
rxrsa [PLN | Placeholder Header =*d; CAS 
rxraay | ANB | Aecess Method Block SSS=*d;CS 
rxrer | diwa | dete Insert Work Aree «CST 
rxrs2" | Aun | Index Modification Work Ares + 391 
Pxrss' | TOA | Index Create Work Aree SSBB 
rxresy [uso | Working Storage Header | 23 


Figure 63 (Part 1 of 2). Control Block Identifier Cross-Index Chart 
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[RB em 
Block Description Page 
exrour | LPMB Logical-to-Physical | Logical-te-Physical Mapping Block = Block 

pr eee eae 
rawaay | siren | Resource Poo Paraneter List —~(| 359 
Pavan’ | ameas | Access Mathod control Bleck Structure | 353 
Taves* | aap | hetua Block Processor SS~*d Se 
Trpacune | ctw | 6L08e work ares id 
[apnorumi | op | OPEN Work Area SSOSCS~*diC 
Troms [tone | 170 Panagenent Bock ——SOSC~diC 


Figure 63 (Part 2 of 2). Control Block Identifier Cross-Index Chart 



















1 AMBLID — offset 32 (X'20') 
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ABP--ACTUAL BLOCK PROCESSOR (I/O-MANAGEMENT COMMUNICATION VECTOR TABLE) 
The ABP is a communication vector table that contains entry 
points for I/0 management modules located in the nuclaus. It is 
link-edited in the nucleus as IDAI12Z1CV, along with the modules. 


The ABP is created by NIP and pointed to by the system CVT 
(CVTIOBP). 


Actual Block Processor (ABP)—Description and Format 


Offset Bytes and 

Dec (Hex) Bit Pattern Field Name Description 

0¢0) 1 ABPID Control block identifier, X'Cl1' 

1¢1) 1 ABPLEN Length of the ABP 

2(2) 2 Reserved 

4(4) 4 ABPSIOD Address of the supervisor-state I/0 driver 
(IGC121) 

8(8) 4 ABPABP Address of the actual block processor routine 
CIDA121A2) 

12(C) 4 ABPNE Address of the normal end appendage (CIDA121A3) 

16¢10) 4 ABPAE Address of the abnormal end appendage 
CIDA121A4) 

20¢614) 4 ABPDIE Disabled interrupt axit 

24(18) & ABPBR14 Branch on register 14 

28(1C) G ABP12145 VSAM synchronous module address (IDA121A5) 

32(20) 4 ABP019RD VSAM record management DD dummy CIDA0N19RD) 

36024) 4 ABPXI19RI1 VSAM record management-——entry point address in 
IDAO0139R0O for calls to IDAO019R1 

40(28) 4 ABPX195S1 VSAM record management-—entry point address in 
IDA013R0 for calls to IDA01951 (fast path) 

44(2C) 4 ABPXLJRD Entry address in IDA019R0 for VSAM JRNAD exit 

48(30) 4 ABPXLUPA Entry address in IDAQ19RO for VSAM UPAD exit 

52034) 4 ABPXLUSR Entry address in IDA019R0O for VSAM user exit 

56(638) 4 ABPXLXEX eve address in IDA019RO for VSAM exception 
exi 

60¢3C) 4 ABPDFPID Address of Data Facility Product id table 

64(40) 4 ABPXL006 Reserved 

68044) 4 ABPOLIOR1 Address of VSAM record management module 
IDA019R1 

720648) 4 ABPO019S1 Address of record management fast path module 
IDA0195S1 
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ACB-—-ACCESS METHOD CONTROL BLOCK 


The VSAM ACB describes a VSAM cluster. It is built by the 
user's program with the ACB or GENCB macro. Before the cluster 
is opened, the ACB can be modified by the user's DD statements 
and ‘Sy the MODCB macro. After the cluster is opened, the ACB is 
pointed to by the RPL (CRPLDACB) that describes the user's record 
processing request. 


The ACB resides below 16 megabytes whether the caller's 
addressing mode (CAMODE) is 24 or 31 


Access Method Control Block (ACB)—Description and Format 


Offset 
Dec (Hex ) 


0¢€0) 
1¢1) 


DS 
a te ht! 
LS 
es We 


Bytes and 
Bit Pattern Field Name Description 
1 ACBID Control block identifier, X‘'AO' 
1 ACBSTYP Subtype: 
X*'10" = VSAM 
X'20° = VTAM 
2 ACBLENG Length of the ACB 
2 ACBLENG2 ACB length in bytes 
2 ACBLEN2 ACB length in bytes 


Access Method Control Block (ACB)——Description and Format 


offset 
Dec (Hex ) 


404) 


8(8) 


12¢C) 


13¢(D) 


Bytes and 
Bit Pattern Field Name Description 
4 ACBAMBL Address of the AMBL 
ACBJWA JES work area address 
ACBIBCT IBCT address 
ACBAMWAP Access method work area pointer 
4 ACBINRTN Address of the VSAM Interface routine 
CIDA019R1) 
2 ACBMACRF MACRF flags: 
ACBMACRI MACRF flag byte 1: 
Les ‘ ACBKEY The record is identified by a key—keyed 
processing 
ACBADR The record is identified by a RBA 
ACBADD Crelative byta address)—addressed processing 
Ss, cage ACBCNV Control interval processing 
eUbte. ecgicd ACBBLK Control interval processing 
Sada: eee ve ACBSEQ Saquential processing 
igs ACBDIR Direct processing 
ne IGN ACBIN Input (GET, READ) processing 
wk. ACBOUT Output CPUT, WRITE) processing 
sed ACBUBF User-supplied buffer space 


ACBMACR2 MACRF flag byte 2: 


5 ACBSKP Skip sequential processing 

; ACBLOGON VTAM LOGON indicator 

a ACBRST Set data set to empty state 

Ls ACBDSN Basic subtask shared control-block connection 


on common DSNAMEs 
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Access Mathod Control Block (ACB)—Description and Format 


Offset 
Dec (Hex ) 


14(E) 


15(F) 

16¢10) 
18(12) 
20¢14) 
20(14) 


21(15) 
22(16) 
24(18) 


25(19) 


ROA PO 
nan Om 
votala, 
PPP 
ws wes 


27(1B) 


28(1C) 
32020) 


LY26-3907-1 © Copyright 


Bytes and 
Bit Pattern 
Rare | 
xxx. eee 
1 
1 
2 
2 
4 
1 
thew, Neale 
ails, ie senate 
Pere ee 
bok. ae ave 
é ro ae 
Pees ie 
par | 


o XXX 


Field Name Description 


ACBAIX 


ACBBSTNO 


ACBSTRNO 
ACBBUFND 
ACBBUFNI 
ACBBUFPL 
ACBMACR3S 
ACBLSR 
ACBGSR 
ACBICI 
ACBDFR 
ACBSIS 
ACBNCFX 
ACBMODE 
ACBSHRP 
ACBJBUF 
ACBRECFM 
ACBRECAF 
ACBCCTYP 
ACBTRCID 
ACBASA 
ACBOPT 
ACBDSORG 
ACBSORI 


ACBCROPS 
ACBCRNCK 
ACBCRNRE 


ACBDVIND 
ACBOPTJ 


ACBDSOR2 


ACBDORGA 


ACBMSGAR 
ACBPASSW 


IBM Corp. 


1974,1985 


Objact to be processed jis the alternate index 


of the path specified in the given DDNAME 


Reserved 


Number of concurrent strings for 
alternate-index path 


Number of RPL strings 

Number of buffers requested for data 
Number of buffers requested for index 
JES buffer pool address 


MACRF flag byte 3: 

Local shared resource 

Global shared resources 

Improved control-interval accass 

Write operations are to be deferred 
Sequential insert strategy 

Control blocks are fixed in real storage 
VSAM 31-bit addressing mode I/0 buffers 
Reserved 


VSAM shared resource pool id 
Number of buffers raquested for journal 
Record format: 

JES format 

Control character: 

3800 translate table 
Reserved 

Control character type 
Nonuser options: 

Match ACBDORGA with DCBSORG 
First byte: 


Checkpoint/restart options: 


Restart hasn't checked for modification since 


last checkpoint 


Data added since last chackpoint hasn't been 
erased by restart, and no reposition to last 


checkpoint takes place 

Device indicator 

3800 control character present 
Reserved 


Second byte: 
Reserved 

ACB indicator 
Reserved 
Massage area 


Address of the user~supplied password 
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Access Method Control Block (ACB)-——Description and Format 


offset Bytes and 
Dec (Hex ) Bit Pattern Field Name Description — 


36024) 4 ACBEXLST Address of the user EXLST 
ACBUEL 


J 
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Access Method Control Block (ACB)—Description and Format 


Offset 
Dec( Hex ) 


40028) 


After OPEN 
40028) 
42(2A) 


43(2B) 
43(2B) 


44(2C) 
45(2D) 


Not Changed 


48030) 


49(31) 


50(¢32) 
50(€32) 


LY26-3907-1 


Bytes and 
Bit Pattern 
8 
2 
1 
1 
1 
1 
3 
by OPEN 
1 
ood. woes 
wicks “as 
. ee l.. 
Eee otek 
Ssigee: “abs 
scat ae 
cee ae | 
xx. KM. 
1 
2 
1 
Meee ce 
os ees 
wel. .. 
sod. ee 
cee hes 
pies 
a 
jae 
ool 


Field Name 


ACBDDNM 


ACBTIOT 
ACBINFL 


ACBAMETH 
ACBAM 


ACBERFL 
ACBDEB 


ACBOFLGS 
ACBEOV 
ACBOPEN 
ACBDSERR 
ACBEXFG 
ACBLOCK 


ACBIOSFG 
ACBBUSY 


ACBERFLG 


ACBINFLG 
ACBINFL1 
ACBJEPS 
ACBIJRQE 
ACBCAT 
ACBSCRA 
ACBUCRA 
ACBSDS 


ACBVVIC 
ACBBYPSS 


© Copyright IBM Corp. 


1974,1985 


Description 


DD name 


Offset to the TIOT 
Indicator flags 


Access method type 
Access method type 


Error flags 


Address of the DEB 


Open/Close flags: 


EOV concatenation 

The ACB is open 

pee ee requests are possible against the 
User exit flag 

ACB is locked 

The Open or Close routine is in control 

ACB is busy 

Reserved 


Error flags 

Note: For details on the ACBERFLG error 
flags, see "Qpen and Close Return Codes" in 
"Diagnostic Aids." 


Indicator flags 
Indicator flag byte l 


Reserved 

JEPS processing 

RQE being held by JAM 

The ACB describes a VSAM catalog 

Catalog recovery area is built in system 
storage 

Catalog recovery area is built in user's 
storage 

A VSAM data set is being opened as a system 
data set 

Data set being opened is an MSVI data set. 
Bypass security checking 
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Access Method Control Block (ACB)~—Description and Format 


Offset ay ree and 
Dec(Hex) Bit Pattern Field Name Description } 
51¢€33) 1 ACBINFL2 Indicator flag byte 2 
Lei ay ocd ACBSWARN Suppress open warning message and verify, if 
data set improperly closed condition is 
detected 
Py rer ere a ACBSOPEN Suppress close catalog update of tha open 
indicator 
cake eke ACBCBIC Open with control blocks in common storage 
area 
Seed: Suave ACBCATX Open JCF CAT without SVC26 
cone XXKX Reserved 
520634) 4 ACBUJFCB Address of the user JFCB 
§2(34) 1 ACBOPTN JAM UCS indicator 
53¢35) 3 Reserved 
56(38) 4 ACBBUFSP Amount of space available for the buffers 
60(3C) 2 ACBBLKSZ Length of the physical DASD record 
ACBMSGLN Message length 
62(¢3E) 2 ACBLRECL Length of the user's record 
64040) 4 ACBUAPTR Address of the user's work area 
68644) 4 ACBCBMWA Address of the work area for control block 
manipulation 
72(¢48) 4 ACBAPID Address of application ID 
72648) & ACBMAX Access method ACB extension 


AMB~"ACCESS METHOD BLOCK 


The AMB describes a VSAM data set or index and points to control 
blocks needed to process data sat and index records, such as the 
BUFC, the PLH, the catalog's ACB, and the AMDSB. An AMB is 
built for a cluster's data set and, if the cluster is 
key-sequenced, an AMB is built for the index. Each AMB 
associated with the cluster is pointed to by the AMBL (CAMBLDTA 
points to the data AMB; AMBLIX points to the index AMB). When a 
data set's or index's record is being processed by VSAM record 
Hest pages register 3 CRAMB) points to the data set's or 
index's 


Access Method Block (AMB)-—~Description and Format 


Offsat Bytes and 

Dec(Hex ) Bit Pattern Field Name Description 

0¢0) 1 AMBID Control block identifier, X"40' 

1¢1) 1 AMBRSC Resource TS byte 

2(2) 2 AMBLEN Langth of the AMB 

4(4) 4 AMBLINK Address of the next AMB in the AMB chain 


J 
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Access Method Block (AMB)—Description and Format 


Offset 
Dec (Hex ) 


8(8) 


12(C) 


16¢10) 


20¢14) 


24(18) 
24(18) 


25019) 


26(01A) 
26(1A) 


27(1B) 


28(1C) 


32(¢20) 
35(23) 


38(26) 
40(28) 
42(2A) 


LY26-3907-1 


Bytes and 
Bit Pattern 
4 
4 
4 
4 
1 
1 
i eet 
Pe ee 
Geckos ase o3 
eles KKK HK 
1 
: ees * 
0<% 
Pe ieee 
Gouna! = Ants 
Saad). v28te 
Pan: rae 
ee 
me be 
Pe | 
2 
1 
1 
0000 .... 
giteg. Sd ears 
.000 
4 
3 
3 
2 
2 
1 
wl ae 


Field Name Description 


AMBBUFC 


AMBPH 


AMBCACB 


AMBDSB 
AMBEOVR 
AMBFLGO 
AMBPSDS 
AUBSWSP 
AMBSHR1 
AMBFLG1 
AMBCREAT 
AMBTYPE 


AMBMCAT 
AMBUCAT 
AMBSPEED 


AMBUBF 
AMBJRN 


AMBINBUF 


AMBDSORG 


AMBDORGA 
AMBIOBAD 
AMBIOMB 
AMBCDSN 
AMBDDSN 


AMBTIOT 
AMBINFL 
AMBCAT 


© Copyright IBM Corp. 


1974,1985 


Address of the BUFC header associated with the 
AMB for non-shared resources or address of the 
BSPH associated with the AMB for shared 
resources 


Arial of the PLH header associated with the 
MB 


Address of the VSAM catalog's ACB (tha ACB of 
the aoe that contains the object's catalog 
recor 


Address of the AMDSB 


End-of-Volume request type (See AMBXN Control 
Block: AMBXEOVR Field) 
MVM AMB flags: 


Page space 
Swap space 
Share option 
Reserved 


Indicator flags: 


The object is being created (load mode) 

The AMB describes a data set 

The AMB describes the index of a key-sequenced 
data set 

The AMB describes the master catalog 

The AMB describes a user catalog 

Speed option: Control intervals are not 
preformatted before the user's data records 
are written (Conly applies when the data set is 
created). 

User buffering has been specified 

The user's EXLST contains a journaling exit 
routine's address 

The data set is shared-—a direct buffer 
request has been issued 


Data set organization indicators: 
Reserved 


Always zero 
VSAM access method 
Always zero 


Address of the IOMB 
Address of the IOMB 


Data set name of the catalog 


Data set name of the object associated with 
the AMB 


Reserved 
Address of the TIOT 
Indicator flags: 


The AMB describes a catalog 
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Access Method Block (AMB)—Description and Format 


offset 
Dec (Hex ) 


43(02B) 


44(2C) 
44(02C) 


45(2D) 
48(30) 


49(31) 


50(32) 
52034) 
56038) 
56(38) 
60(¢3C) 
64040) 


68044) 
68644) 


72048) 
76(4C) 
80(50) 


84(54) 
84054) 


85(55) 
86(56) 
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Bytes and 
Bit Pattern 


XXX. 


°-o F§ WwW BER 


er PF HL LF HH HF HLH HLH HL HLH AN 


00. 


Logic 


Field Name Description 


AMBSCRA 
AMBUCRA 
AMBUPX 
AMBSDS 
AMBAMETH 


AMBDEBPT 
AMBIFLGS 


AMBDEBAD 
AMBOFLGS 


AMBOPEN 


AMBEXFG 
AMBBUSY 


AMBFLG2 
AMBPUG 
AMBSHR 
AMBUP 
AMBRPT 
AMBEDB 
AMBEOVPT 
AMBAMBXN 
AMBWKA 
AMBIWA 


AMBIOBA 
AMBSVI 


AMBP IXP 
AMBPAMBL 
AMBUPLH 


AMBCSWD1 
AMBAFLG 


AMBLSR 
AMBGSR 
AMBICI 
AMBDFR 
AMBSIS 
AMBCFX 


AMBRDCNT 


Catalog recovery area is in system storage 
Catalog recovery area is in user's storage 
An upgrade table CUPT) exists 

System data set 

Reserved 


VSAM access method indicator 


DEB address 
Error flags 


Address of the DEB 

Open status flags: 

Always zero 

The AMB is open 

Always zero 

User exit routines are active 

Busy bit 

Flag byte 2: 

The data set described by this AMB is an 
alternate index in an upgrade set 
Data set using share option (3 or 4) 


UPAD is present 
Reserved 


Address of the EDB 

Address of the AMBXN for an End-of-Voluma 
request 

Pointer to AMB extension in MVB 

Address of the AMB work area 

Address of the DIWA 


Address of the IOB 
Object VSI pointer 


Address of the index's AMB 
Address of the primary AMBL 


Address of upgrade placeholder 


Flag byte: 


Local shared resources 

Global shared resources 

Improved control-interval access 
Defer write operations 

Sequential insert strategy 

Control blocks fixed in real storage 
Reserved 


Reserved 


Reserved 
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Access Method Block (AMB)—~Description and Format 


C 


Offset Bytes and 
Se Dec(Hex) Bit Pattern Field Name Description 

88(58) 4 AMBBM2SH Raserved 

92(05C) 4 AMBCPA With shared resources: address of the WSHD; 
without shared resources: address of the first 
CPA in the chain 

96(060) 4 AMBWSHD Address of working storage header 

100¢64) 8 AMBEXEX Name of user's exception exit routine 

108(6C) 2 AMBSZRD Size of the channel program for read 

110(6E) 2 AMBSZWR Size of the channel program for write 

112¢70) 2 AMBSZFW Size of the channel program for format write 

114¢€72) 2 AMBSZCP Size of the CPA base 

116(74) 4 AMBVIOT Address of the valid-IOMB table 

120(¢78) 4 AMBTRACE Address of trace table 

124(7C) 3 AMBPAL Primary allocation quantity 

127(7F) 1 Reserved 

128(80) 3 AMSBSAL Secondary allocation quantity 

131(83) 1 Reserved 

132(84) 1 AMBSOPT Allocation option 

133(85) 3 AMBRNLEN RNAME lengths 

133(85) 1 AMBRLN Length of RNAME 

134(86) 1 AMBDSLN Length of data set name 

135(87) i AMBCATLN Length of catalog name 

136(88) 44 AMBDSNM Component name 

180(B4) 4 AMBUPAD Pointer to UPAD routine 

184(B8) 4 AMBJRNAD Pointer to JRNAD routine 


AMBL~~ACCESS METHOD BLOCK LIST 
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The AMBL describes a VSAM cluster and points to the cluster's 
data set and index AMBs. When the cluster is opened, an AMBL is 
built to describe the cluster. If the cluster's data set (and 
index) is shared with other users, AMBs already exist for the 
data set Cand index). Tha existing AMBs' addresses are put into 
the AMBL. If the cluster is not shared, AMBs are built to 
describe the cluster's data set and, if the cluster is 
key~sequenced, to describe the data set's index. The AMBL is 
pointed to by the cluster's ACB CACBAMBL). 
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Access Method Block List (AMBL)—Description and Format 


Offset 
Dec (Hex) 


0¢0) 
4(4) 


8(8) 
12(C) 


13(D) 
14(D) 


16¢10) 
16(€10) 
16(€10) 
20014) 


23(17) 


24(18) 


28(C1C) 


28(1C) 


29(€1D) 
SOCLE) 


S1C1F) 


Bytes and 


Bit Pattern 


4 
4 


_ 


0 KK KMKXM 


Ww P0000 A = 


= 
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Field Name 
AMBLPCHN 
AMBLSCHN 


AMBLACB 
AMBLEFLG 


AMBLWAIT 
AMBLESET 


AMBLCOMP 


AMBLDDNM 
AMBLIDF 
AMBLCACB 


AMBLDCI 


AMBLQ 


AMBLDDC 
AMBLGSR 
AMBLLSR 
AMBLFSTP 


AMBLUBF 
AMBLKSDS 
AMBLESDS 
AMBLDFR 


AMBLXPT 


AMBLVC 


AMBLVRT 


AMBLENO 
AMBLTYPE 


AMBLPATH 
AMBLUPGR 
AMBLAIX 
AMBLBASE 
AMBLFIX 


AMBLQ2 
AMBLCBIC 
AMBLOVSI 


AMBLSHR 
AMBLCRE8 


Description 
Address of the primary AMBL in the AMBL chain 


Address of the secondary AMBL in the AMBL 
chain 


Address of the ACB associated with the AMBL 


J 


End of Volume flags: 


End of Volume is waiting 

End of Volume encountered an error and 
restored control blocks to their original 
condition 

Reserved 


End of Volume lock 
Reserved 


The ACB's DDNAME field 
Cluster identifier 
Address of the ACB of the catalog 


Control-interval number of the catalog data 
record 


Qualifier: 


DD connect only 

Cluster opened for global shared resources 
Cluster opened for local shared resources 
Cluster opened for fast path Cimproved 
control-interval access) 

Cluster opened for user buffering 

Cluster opened as a key-sequenced data set 
Cluster opened as an entry~sequenced data set 
Cluster opened for deferred writes 


In a base AMBL, address of the path AMBL; in a 
path AMBL, address of the base AMBL 


Identifies the entry in the valid-AMBL table 
that identifies this AMBL 


Number of the valid~AMBL table in the chain of 
valid-AMBL tables 


Offset within the valid-AMBL table 


J 


Type of control block structure opened: 


Path 

Upgrade set 

Alternate index 

Base cluster 

Control blocks are fixed in real storage 
Reserved 


Qualified extension 


Cluster opened with control blocks in common 
storage area 

Reserved by open for VSI cleanup processing 
Share option (3,3) or (4,3) 

Create mode 


J 
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Access Method Block List (AMBL)——Description and Format 


Offset Bytes and 
Dec (Hex) Bit Pattern Field Name Description 
: ee AMBLXPFL PFL does not exist 
ee a AMBLMMS Media manager 
- XX Reserved 
32(20) 1 AMBLID Control block identifier, X*'50' 
33¢(21) 1 AMBLSHAR Sharing indicators: 
| owe ne AMBLPRIM Identifies the primary AMBL 
ee Mee ‘ AMBLCATO The catalog is open 
per AMBLWRIT The user intends to write or update records in 
the data set 
oe eX XXXX Reserved 
34(€22) 1 AMBLLEN Length of the AMBL 
35(€23) 1 AMBLFLG1 Flags: 
1c. AMBLFULL The user~supplied master password was varified 
my ee AMBLCINV The user-supplied control~interval password 
was verified 
msgee - ag AMBLUPD The user~supplied update password was verified 
6Gd.. AMBLVVIC The AMBL is for the mass storage volume 
inventory (MSVI) data set 
are aes AMBLSDS The AMBL is for a system data set 
te. Jens AMBLSCRA The AMBL is for a catalog recovery area in 
system storage 
ae es AMBLUCRA The AMBL is for a catalog recovery area in 
user's storage 
eh AMBLCAT The AMBLACB field points to a catalog's ACB 
Pee | AMBLDUMY A DD DUMMY statement was specified 
x XM. The combination of these bits indicates the 
type of data set: 
001 Catalog 
101 MSVI 
011 SCRA 
36(24) 1 AMBLFLG2 Flags: 
Gh. ag AMBLSTAG Cluster is staged 
deter Le? Aes AMBLII This AMBL is for an ISAM interface structure 
XxXM. XXX Reserved 
37(¢25) i AMBLNST Number of strings 
38(26) 2 AMBLNUM Number of AMB pointers in the AMBL 
40(28) & AMBLMMIB Pointer to media manager interface block 
44(2C) & AMBLDSAB Pointer to the DSAB 
48(30) 4 Reserved 
52034) 4 AMBLDTA Address of the cluster's data set AMB 
56(38) & AMBLIX Address of the cluster's index AMB 
60¢3C) q AMBLBIB Address of the base information block 
64(40) 4 AMBLCMB Address of the cluster management block 
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AMBXN-—ACCESS METHOD BLOCK EXTENSION 


The AMB and the IOMB are kept in a protected subpool with key 0. 
They cannot be changed by the user or by Record Management. 
Record Management needs to store information in the AMB and the 
IOMB. Some of their fields have been moved to the AMBXN. It 
contains one set of fields for the AMB and one set for each IOMB 
associated with the AMB. 


Access Method Block Extension (AMBXN)—Description and Format 


Offset Bytes and ; ; 
Dec (Hex) Bit Pattern Field Name Description 
0¢0) 32 IDAAMBXN AMB extension block 
0c0) 8 AMBXEOV End-of-Volume interface fields CIDAEQVIF) 
0¢€0) 4 AMBXEVPT Address of the key or RBA to be used by End of 
Volume 
4(4) 1 AMBXRSC Resource TS byte 
5(5) 1 AMBXEOVR End-of-Volume request type: 
X*80' Page-space data set 
X'oi' Mount by key 
X*8i' Mount by RBA 
X*'o2' Allocate by key 
X*82' Allocate by RBA 
X*'04' Update catalog 
6(6) 1 AMBEVRC Access method end-of-volume return code 
7(7) 1 AMBXFLGS Status flags 
: ee AMBXUPD VSI update needed 
~XXX XXXX Reserved 
8¢8) & AMBXASCB Address of end-of-volume caller's ASCB 
12¢C) 4 AMBXECB ECB for access method end-of-volume 
16(10) G AMBXCSWD Used by buffer management for shared resources 
serialization 
16¢€10) 2 Unused 
18¢€12) 2 AMBXRDCT Number of control intervals read 
20(14) 4 AMBXBM2S Address of the PLH being used for a second 
search of a subpool 
24(18) 4 AMBXLVL AMB/VSI level number 
28(1C) 4 AMBXBFR1 First buffer associated with the AMB 
IOMB Portion-~IOMBXN 
0¢€0) 1 IOMXLOCK Resource TS byte 
1¢1) 1 IOMXFLGS I/0-management flags: 
Deeeran: aiestus IOMXUSE Error processing is complete 
pike siesta, ITOMXEOVW EOV wait for asynchronous I/0 
Pore: es eee IOMXSCAN Scan buffer 
70 eX KXXX Resarved 
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IOMB Portion-—-IOMBXN 


2¢2) 


4(4) 
4(4) 


6 (6) 
8(8) 
12¢C) 
16¢10) 


20¢14) 
20¢14) 


21¢€15) 
24(18) 


&_ 


Ke FPP PH FF YW NK FY 


~XXX XXX 
gccce ee 
2 XX XXX 
3 
4 


x 


x 


IOMB Portion——IOMBXN2 


0¢0) 
404) 
8(8) 
12¢C) 
16¢€10) 
20(14) 
21¢€15) 
24018) 


Fr WwW Fe HF HF LF LK KL 


IOMXP DET 
ITOMXBFLG 


IOMXR13S 
TOMXRPL 
IOMXR14 


IOMXRECB 
IOMXECB 


IOMXWAIT 
TOMXRSLT 
IOMXPOST 
IOMXIOCC 


TOMXRBPT 


TOMXURPL 
IOMXUDSI 
ITOMXUECB 
IOMXUFDB 
IOMXURF1 
TOMXUCOD 
IOMXURF2 
IOMXUIOM 


Reserved 


Problem-determination fields 
I/0 flags at I/0 initiation 


Reserved 

Address of the user's save area 
Address of the first RPL in a chain 
Asynchronous I/0 register 14 save 
Record management I/0 ECB 

I/O ECB: 

wait bit 

completion result 


post bit 
completion code 


I/0 
I/0 
1/70 
I/0 
Pointer to RB Crequest block) or result 


Reserved 


RPL address 

DSID address 

ECB address 

User feedback field 
Reserved 

UPAD code 

Reserved 


IOMB address 


AMCBS-~ACCESS METHOD CONTROL BLOCK STRUCTURE 
The AMCBS contains information that is used by DFP to locate the 


LY26-3907-1 


master catalog and user catalogs. 
master catalog is opened, 
The CVT CCVTCBSP) points to the AMCBS. 


processing). 


Offset 
0 «0) 
2 (2) 
4 (4) 


The AMCBS is built when the 
during NIP Cnucleus initialization 


Bytes and 
Bit Pattern Field Name Description 
2 CBSID AMCBS ID = 'AM* 
2 CBSSIZ Length of the AMCBS 
4 CBSMCSTA Location (CCCHH) of the 
master catalog 
1974,1985 Data Areas 353 
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Offset 
8 (8) 


12 


16 


20 
24 


28 
32 


he followin 
of keys 0 through 


eac 


CC) 


(10) 


€14) 
(18) 


(1C) 
(20) 


Offset 


32 
36 
96 


97 
100 


104 
108 
112 


113 
116 


120 
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C20) 
(24) 
(60) 


(61) 
(64) 


(68) 
(6C) 
(70) 


(71) 
(74) 


(78) 


Bytes and 
Bit Pattern 


4 


64 


ytes and 


B 
Bi 
4 
4 
1 
1. 


111 1111 
3 
4 


4 
4 
1 
1 


~L11 1111 
3 
4G 
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Field Name 


CBSACB 


CBSCBP 


CBSCMP 


CBSMCUCB 


CBSCAXCN 
CBSCRACA 


CBSCRICB 
CBSVSRT 


air of fields is repeated ei 


7: 


t Pattern Field Name 


CBSVUSE 
CBSVPTR 
CBSFLAGS 
CBSMICF 


CBSVVDSA 


CBSDEVNT 
CBSVSICN 
CBSFLG1 

CBSCUVSI 


CBSPCOPN 


CBSPCCLS 
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Description 


Address of the master 
catalog's ACB 


Address of the control block 
manipulation routine 
CIDA019C1) 


J 


Address of the catalog 
management high-level 
routine CIGGOCLA1) 

Address of the master 
catalog's UCB (contains this 
information until master 
catalog open processing 
begins) 

Address of the CAXWA chain 


Address of the CRA CAXWA 
chain 


Address of CRA task TCB 
CDS (compare and swap 


double) word for VSRT CVSAM 
shared resource table) 


t times—once for 


Description > 
VSRT use count 
Address of the VSRT 
Catalog flags 


ICF master catalog 
Reserved 


Reserved 


Address of VVDS manager 
CIGGOCLEO) 


Device name table address 
Address of IDAVSI chain 
AMCBS flags 

Cleanup of VSI chain is 
required 

Reserved 


Reserved 


Address of private catalog 
open module 


Address of private catalog 
close module 


) 
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AMDSB-—ACCESS METHOD DATA SET STATISTICS BLOCK 


The AMDSB contains statistical information about record 
processing in the data set. It also contains soma of the data 
set's attributes and specifications. The AMDSB is built, using 
the data set or index catalog record's AMDSB sat of fields, when 
the cluster is opened. The data or index AMB CAMBDSB) points to 
its associated AMDSB. 


Access Method Data Set Statistics Block (AMDSB)-—Description and Format 


Offset Bytes and 
Dec(Hex) Bit Pattern Field Name Description 
0(0) 1 AMDSBID Control block identifier, X"60' 
1¢1) 1 AMDATTR Attributes of the data set: 
1 ee - AMDDST Key-sequenced data sat 
ae Entry-~sequenced data set 
Pips ere AMDWCK Check each record when it is written 
: AMDSDT Sequence set is stored with the data and 
replicated 
‘ AMDREPL All index records are replicated 
: AMDORDER Use the volumes in the same order as in the 
volume list 
Pa ee AMDRANGE The data set is divided into key ranges 
ree Ee ANDRRDS Relative record data set 
aide AMDSPAN The data set contains spanned records 
2(2) 2 AMDLEN Length of the AMDSB 
404) 2 AMDNEST Number of index entries tn the index section 
AMDAXRKP Relative kay position of the alternate key 
6(6) 2 AMDRKP Relative key position 
8(8) 2 AMDKEYLN Key length 
10CA) 1 AMDPCICA Percentage of free control intervals in the 
control area 
11(B) 1 AMDPCTCI Percentage of free bytes in the control 
interval 
12(C) 2 AMDCIPCA Number of control intervals in a control area 
14(E) 2 AMDFSCA Number of free control intervals in a control 
area 
16(¢10) & AMDFSCI Number of free bytes in a control interval 
20¢€14) 4 AMDCINV Control interval size 
246(18) 4 AMDLRECL Maximum record size 
28C1C) & AMDHLRBA Relative byte address (RBA) of the high-level 
index record 
AMDNSLOT Number of record slots per control interval 
32(¢20) & AMDSSRBA Relativa byte address (RBA) of the first 
sequence~set record 
AMDMAXRR Maximum valid relative record number 
36024) 4 AMDPARDB Address of the first ARDB 
40¢28) 56 AMDSTAT Data set statistics: 
40(028) 1 AMDATTR3 Attributes of the data set: 
AMDUN®@ The data set has: 
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Access Method Data Set Statistics Block (AMDSB)—Description and Format 


offset 
Dec (Hex) 


41°29) 
202A) 
46(2E) 
48(30) 
56(38) 
58C3A) 
60¢3C) 


64(40) 
68(44) 
72048) 
7604C) 
80(50) 
84054) 
88(58) 
92(05C) 


ARDB-~ADDRESS RANGE DEFINITION BLOCK 
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Bt 


i 


a FSF TH HR HR HR EH RN 


tes and 
t Pattern 


oor of @ @ 
oc + MoS 


o XXX 


Field Name Description 


AMDFAULT 


AMDBIND 


AMDWATT 


AMDLM 


AMDSTRNO 


AMDDUI 
AMDBFNO 
AMDSTAT 
AMDNIL 
AMDNEXT 
AMDNLR 


AMDDELR 
AMDIREC 
AMDUPR 

AMDRETR 
AMDASPA 
AMDNCIS 
AMDNCAS 
AMDEXCP 


Unique keys 

Nonunique keys 

The data set is staged: 

At open time, if required 

By cylinder fault 

The data set is: 

Not bound 

Staged and bound 

After destaging is begun, control is 


returned 


to the program that is closing the data set: 


Immediately 

After destaging is finished 

Load mode, or data set is not loaded 
Data set is loaded 

Reserved 

Number of concurrent requests 

IMS DBRC usage indicator 

Number of buffers 

Statistics 

Number of index levels 


Number of extents in the data set 


Number of user-~supplied records in the data 


set 

Number of deleted records 
Number of inserted records 
Number of updated records 


Number of retrieved records 


Number of bytes of free space in the data set 


Number of times a control interval was split 


Number of times a control area was split 


Number of times EXCP was issued by VSAM I/0 


routines 


The ARDB contains information about space allocated to and space 


actually used by a data set. 


The block is built by the VSAM 


Open routine from information in the data set's catalog record. 
The number of ARDBs depends on whether the data set is divided 


into key ranges Cone ARDB per range, 


or one for a data 


set 


Without ranges) and whether the sequence set of the index is 
placed adjacent to data. 


The ARDB is updated by record- management routines as additional 
space 1s used. 
the AMDSB CAMDPARDB). 


The first ARDB in an ARDB chain is pointed to by 
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Address Range Definition Block (ARDB)—Description and Format 


Offset 
Dec (Hex ) 


0(0) 
1(1) 


2(2) 
4(4) 
8(8) 


12¢C) 


16(10) 


20¢14) 


26C1A) 


28010) 


29¢1D) 


4 a and 
Bit Pattern 


1 
I 


0 MK MK 


VL 


Field Name Description 


ARDID 
ARDTYPE 
ARDKR 
ARDHLI 


ARDSS 


ARDUOVFL 
ARDEOD 


ARDUSED 
ARDUPD 


ARDLEN 
ARDNPTR 
ARDHKRBA 


ARDHRBA 


ARDERBA 


ARDVOLSR 


ARDRELNO 


ARDPRF 


ARDPRSS 
ARDPRFMT 


ARDKEYS 


BIB-~BASE INFORMATION BLOCK 
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Control block identifier, X‘'61'* 
oon the type of space defined by the 


One key range of a key-range data set 

The total index of a key-sequenced data sat, 
or 

The non-sequence set levels of a key-sequenced 
data set's index, when the sequence set is 
stored with the data 

The sequence set of a key-sequenced data set, 
when the sequence set is stored with eae data 
Overflow may be used for this key rang 

The key range containing the highest data RBA 
in the data set 

The ARDHRBA field's initial value has changed 
ARDB modified 

Reserved 


Length of the ARDB 
Address of the next ARDB in the ARDB chain 


The RBA of the data set control interval 
containing the key range's high-key value 


The RBA of the next free-space control 
interval at the end of the data set 


The RBA of the highest control interval 
allocated to the key range 


The serial number of the volume containing the 
highest RBA allocated to the key range 


The sequence number of the data space group 
set of fields that describes the data space 
containing the key range-~~the data space group 
set of fields is in the volume catalog record 
identified by ARDVOLSR 


Preaformat flags: 


The sequence set is stored with tha data 
The key range's extents haven't been 
preformatted 

Reserved 


The key range's low and high key values—the 
pec eer of this field equals twice the key 
eng 


The BIB contains information for virtual-storage management to 
control allocation of storage for a particular base cluster ina 


job step. 


It is further described under "Virtual-Storage 


Management" in "Diagnostic Aids." 


The BIB is pointed to by the AMBL CAMBLBIB) and VGTT CVGTTBIB). 
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Base Information Block (BIB)—Description and Format 


offset 


Dec (Hex ) 


0¢0) 
0¢0) 
i¢1) 


2(2) 
4(4) 
5(5) 
8(8) 
12(C) 
16(10) 
20(14) 
24(18) 
28(1C) 
32(20) 
36(24) 


40028) 
44(2C) 
48030) 


52034) 
56(38) 


0¢3C) 
0(3C) 


64(40) 
68(44) 
72048) 
76(4C) 


6 
6 
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Bytes and 
Bit Pattern 


= 


& fF FP HP HP FH HLH LH WwW & AN 


a 


o fF fF HF He 


Field Name 
BIBHDR 
BIBID 
BIBFLG1 
BIBVIRT 
BIBREST 
BIBCKPT 
BIBCATX 
BIBVVDS 


BIBICF 
BIBUCBUF 


BIBLEN 
BIBFLG2 


BIBUPT 
BIBVMT 
BIBDACB 
BIBAMBL 
BIBSPHPT 
BIBPRSPH 
BIBHEBPT 
BIBHEBF 


BIBVCRT 
BIBWSHD 
BIBCSL 


BIBPSAB 
BIBVGTT 


BIBRTNS 
BIBINTRF 


BIBCEAPP 
BIBASYRT 
BIBSIOAP 
BIBJOBNM 


Description 


Header 


Restricted Materials of IBM 
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Control block identifier, X‘'10° 
Flag byte 1: 


At least one mass~storage UCB is allocated 
Restart in progress for sphere 

Checkpoint in progress for sphere 

CATX option selected 

VSAM volume data set open 

Object cataloged in ICF catalog 


Control block update facility for cross-region 


data set sharing being used in this sphere 


Reserved 


Length of the BIB 


Reserved 


Reserved 


Address 
Address 
Address 
Address 
Address 
Address 
Address 
Address 


of 
of 
of 
of 
of 
of 
of 
of 


the header 


Address 
Address 


Address 
chain 


Address 
Address 


for the 
storage 


clusters 


of 
of 
of 


of 
of 


the 
the 


upgrade table 


volume mount table 


an inner ("dummy") ACB 


the 
the 
the 
the 
the 


primary AMBL in the AMBL chain 
sphere block header 

protected sphere block 

header element block 


first free header alemant in 


element block 


the 
the 
the 


the 
the 


VSAM checkpoint/restart table 
working storage header 


first core save list in the 


protected sphere AMBL block 
VSAM global termination table 


control blocks stored in global 
for a base cluster and its related 


Addresses of record-management routines: 
VSAM interface 


CIDAO19R1) 


Channel end appendage 


Asynchronous routine 


Start-I/0 appendage 
Name of the job that issued OPEN for the base 


cluster 
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Base Information Block (BIB)=Description and Format 


Offset 
Dec( Hex ) 


84(54) 


92(5C) 
100¢64) 


104(68) 
108¢6C) 
112¢70) 
116(74) 


Bt 


8 


& & 


~~ PF HO 


tes and 
t Pattern Field Name Description 
BIBSTPNM Name of the job step that issued OPEN for the 
cluster 
BIBDDNM Name of the DD statement specified for OPEN 
BIBASCB Address of the address space control block for 
the address space that issued OPEN 
BIBVSRTP GSR VSRT address 
BIBSREC Pointer tc SRA entry 
BIBUPAD UPAD address 
BIBJRNAD JRNAD address 


BLPRM—RESOURCE POOL PARAMETER LIST 


BLPRM is created by the BLDVRP and DLVRP macros. It is used by 
record management for dynamic string addition and by data set 
management (CO/C/EOV and checkpoint/restart) for internal 
processing. BLPRM is mapped by IDABLPRM and pointed to by the 
parameter list whose address its in register 1 when SVC 19 is 
1ssued. 


Resource Pool Parameter List (BLPRM)—Description and Format 


offset 
Dec (Hex) 


000) 
1¢1) 
2¢2) 
4(4) 


8(8) 
909) 
10CA) 
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Bytes and ; seed 
Bit Pattern Field Name Description 
1 BLPACBID ACB ID-—xX'‘A0O" 
1 BLPACBST ACB subtype—x'11' 
2 Reserved 
4 BLPBUFLP Address of the buffer list used by BLDVRP 
(described below) 
4 BLPUACB Address of the user ACB Cused for dynamic 
string addition) 
4 BLPIOPLH aroses” of the I/0 Support PLH Cused for 
0 
1 BLPKEYLN Key length 
1 BLPSTRNO String number requests 
1 BLPFLAG1 Flag byte 1: 
Lisiee~ eared BLPFDBDC Shared resources 
cies se eceiue BLPFBLD BLDVRP request 
che. Seed BLPFDEL DLVRP request 
eel aicGials BLPFLSR LSR option 
ee eee learn BLPFGSR GSR option 
Pa ee BLPFIOBF Fix IOBs 
ra BLPFBFRF Fix buffers 
BLPFSTAD Add String 
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Resource Pool Parameter List (BLPRM)—Description and Format 


Offset Bytes and 
bec (Hex) Bit Pattern Field Name Description 
11¢B) 1 BLPFLAG2 Flag byte 2 (used for I/0 support internal 
processing): 
Ds 6s. tare BLPFPART Partial build request 
Gk Gree. Mectane BLPFUPGR Upgrade set Open 
tas Milas “gpa: BLPFPATH Path CAIX) Open 
eer) Ue Bitass BLPFPRIM Primary Open 
ee ae: ere BLPFDATA Data AMB 
ee ae ar BLPFINDX Index AMB 
Re ee BLPFIOSR I/0 support request 
ee a ee BLPFRSTR Restart request 
12(C) 1 BLPOCODE Special use field 
13(D) 3 BLPOACB Address of ACB 
16¢10) 8 BLPCORE Record management GETCORE request 
16(10) 1 BLPGFLG Flag byte: 
Licks atte BLPGREQ GETCORE request 
Les), Stecaes BLPGPG GETCORE page boundary request 
7 XK XXXX Reserved 
17¢€11) 3 BLPGSZ GETCORE length 
20¢€14) 1 BLPGSP GETCORE subpool 
21¢€15) 3 BLPGAD GETCORE return address 
24(18) 4 BLPIOACB Address of I/0 support ACB 
24(18) 3 Reserved 
27¢C1B) 1 BLPDSORG X'*08" Crequired for BLDVRP, DLVRP, and string 
addition) 
28(1C) 1 BLPSHRP Shared resource pool id 
29¢€1D) 18 BLPFLAG3 Resource pool flags 
Dies: me ae BLPANY Shared pool I/0 buffers can reside above 16 
megabytes 
XXX XXXX Reserved 
3S0C1E) 18 Reserved 
48(30) 1 BLPOFLGS X'o2' 
49¢€31) 2 Reserved 
5§1(¢33) 1 BLPERFLG X*'00' 


The buffer request list Cpointed to by BLPBUFLP) is repeated once for each buffer 


pool. The format is: 

0(€0) 4 BLPBUFSZ Buffer size 

404) 1 BLPBRLFG Buffer list flags: 
deo ete. sora BLPBFLST Last buffer request 
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5(5) 
6(6) 


~XXX XXX 
1 
2 


BLPBFLCT 


BSPH-~-BUFFER SUBPOOL HEADER 


Reserved 
Reserved 


Buffer count 


The BSPH is built for processing with shared resources. 


defines a buffer pool in the VSAM resource pool. 


It 
The first BSPH 


for the resource pool is pointed to by the VSRT (CVSRTBUFH). 
Each BSPH is pointed to by an AMB CAMBBUFC) that uses the buffer 
pool defined by the BSPH. 


Buffer Subpool Header (BSPH)—Description and Format 


offset 
Dec (Hex ) 


0¢€0) 
1¢1) 


2(2) 
4(4) 
8(8) 
12(0) 
14(E) 
16¢10) 


20(14) 


24(18) 


28¢(1C) 
28(1C) 


29(1D) 
30(1E) 
32(20) 


36024) 


LY26-3907-1 


Bytes and 
Bit Pattern 


1 


_ -_ 
e 


’ Mm Mm FS HF BN 


— 


Field Name 


BSPHID 
BSPHFLG1 
BSPHIOBF 
BSPHBFRF 
BSPHLEN 
BSPHNM 
BSPHNBSP 
BSPHBFNO 
BSPHERCT 
BSPHBUFC 


BSPHMDBT 


BSPHBSZ 

BSPHCSRC 
BSPHFLG2 
BSPHAPRT 


BSPHPCUC 
BSPHIUCS 


BSPHPSUC 
BSPHCPLH 


BSPHRDS 


© Copyright IBM Corp. 
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Description 

Control block identifier, X'72' 

Flag byte 1: 

TI/0-related control blocks are fixed in real 
storage 

I/0 buffers are fixed in real storage 

Length of the BSPH 

Visual name: ‘"BSPH* 

Address of the next BSPH for the resource pool 
Number of buffers in the buffer pool 


Count of write errors 


Address of the first BUFC for the buffers in 
the pool 


Modification bits——they indicate IDs of 
transactions that have modified the buffer 
CRPL TRANSID operand) 


Length of each buffer in the pool 
Compare/swap resource-—used to serialize the 
use chain: 

Flag byte 2: 

Arithmetic protect bit 

The use chain is being changed 

Use chain invalid status 

Reserved 

Reserved 

Number of PLHs searching the use chain 


Address of the PLH that is modifying the use 
chain 


Number of I/0 operations to bring data into 
the buffer pool 
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Buffer Subpool Header (BSPH)——Description and Format 


offset 
Dec (Hex ) 


40028) 


44(2C) 


48(30) 


52034) 


56(38) 
60¢3C) 


Bytes and : ie 

Bit Pattern Field Name Description 

4 BSPHFND Number of requests for retrieval that could be 
satisfied without an I/0 operation 

4 BSPHUIW Number of user~-initiated writes from the 
buffer pool 

4 BSPHNUIW Number of nonuser-initiated writes (writes 
that VSAM was forced to do because no buffers 
were available) 

q BSPHUTOP Address of the top of the use chain 

& BSPHUBTM Address of the bottom of the use chain 

4 BSPHLST Address of the first BSPH for the resource 
pool 


BUFC--BUFFER CONTROL BLOCK 


The BUFC consists of a buffer header that describes the buffer 
pool and a buffer control entry that describes each buffer 
requested by the user and each buffer required for preformat 
processing. The header describes the structure of the buffer 
pool. Each buffer control entry contains function codes, status 
indicators, and RBAs to describe the buffer. The buffer control 
entry also contains the address of its associated placeholder 
CPLH), the data buffer, the associated channel program (Cpointed 
to by the CPA), and the next BUFC in the chain. 


Index and data have separate blocks of BUFCs. At the end of 
each block are BUFCs used for preformat processing—they are 
pointed to by a field in the header. 


The BUFC is the interface between I/0 management and buffer 
management CIDA019R2 and its procedures). The BUFC is pointed 
to by the PLH (PLHDBUFC points to the data BUFC; PLHIBUFC points 
to the index BUFC). 


Both the buffer header and the buffer control entry are created 
by Open and released by Close. The AMB points to the buffer 
header. The DIWA points to the insert buffer control entry, and 
each placeholder points to a chain of one or more data buffer 
control entries and one index buffer control entry. 


Buffer Control Block (BUFC)—Description and Format 


Offset 
Dec (Hex) 


0¢0) 
1¢1) 


2(2) 


Bytes and : 

Bit Pattern Field Name Description 

1 BUFDRID Buffer-~header identifier, X‘'70' 

1 BUFDRNO Number of buffer control entries in this 
buffer pool, excluding preformat buffer 
control entries 

2 BUFDRLEN Length of the buffer header and all buffer 


control entries associated with this buffer 
pool 
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Buffer Control Block (BUFC)—Description and Format 


Offset Bytes and ; 

Dec (Hex ) Bit Pattern Field Name Description 

4(4) 4 BUFDRPFB Pointer to the first BUFC in a pool of BUFCs 
that are reserved for preformatting data 
control areas or index tracks 

8(8) 1 BUFDRPFN Number of preformat BUFCs 

9(9) 1 BUFDRCIX Number of index buffers in an index buffer 


pool that are not assigned to a placeholder 
and are not reserved for the highest level 
index record 

BUFDRMAX Maximum number of buffers that can be assigned 
to a placeholder that is in sequential mode 


10CA) 1 BUFDRTSB Test~and-set byte for the buffer header-—this 
byte is set to X'FF’ when a buffer is being 
taken from the buffer pool and assigned to a 
placeholder; set to X'00' in all other cases 


11TCB) 1 BUFDRFLG Buffer status flags: 
Lies. eis BUFDRREL Buffer-released flag, which is set when a 
Par aneeee returns a buffer to the buffer 
poo 
the. Aer BUFDRAVL Buffer is available, which is set when there 


are data buffers in the pool that are not 
reserved for inserts and are not assigned to 


placeholders 
o oXX XXXX Reserved 
12¢C) 4 BUFDBUFC Address of the first BUFC 
16¢€10) 4 Reserved 
Buffer 
control 
Entry 
0(¢0) 1 BUFCAVL Test-and-set byte for the buffer 
BUFCUCNT Use count 
1¢1) 1 BUFFLG1 BUFC status flags: 
| eee eee ere BUFCUPG This BUFC is associated with an upgrade set 
ne ee eee BUFCSEG The buffer contains a segment of a spanned 
record 
elle: “eeetets BUFCINS Identifies this buffer as an insert 
buffer—this buffer can be assigned to a 
placeholder for data only for the duration of 
a single request 
aes meer er BUFCERI Error generated by input processing 
oi. score BUFCER2 Error generated by output processing 
are ear BUFCVAL Input RBA is valid 
ee ee BUFCEXC The control interval represented by this BUFC 
is in exclusive control-this field is 
meaningful only when the input RBA is valid 
ol BUFCEPT I/O-complete flag 
2(2) 1 BUFCIOFL I/O status flags: 
Deg sc ee - deduce BUFCMW Control interval must be written at the 


indicated output RBA CBUFCORBA)—note that 
output processing is done before input 
processing for the same BUFC 

Be eae ete BUFCFMT This BUFC is associated with a format-write 
channel program (pre-format) 
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Buffer Control Block (BUFC)—Description and Format 


Offset 
Dec (Hex ) 


3¢3) 


4(4) 


8(3) 


12(C) 


16(10) 
20(14) 


24(18) 


28(1C) 
28(1C) 


32(20) 
32¢20) 


36024) 
36(24) 


40¢28) 


44(2C) 
48(30) 
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Bytes and 
Bit Pattern 


ys) 


t& P PH NUP HL 


oe 
saree | 


ae 


Field Name 


BUFCRRD 


BUFCREAL 
BUFCWC 


BUFCXEDB 


BUFCPFCP 
BUFCFIX 
BUFCFLG2 
BUFCXDDR 
BUFCNLAS 
BUFCBSYR 
BUFCBSYW 
BUFCEOD 
BUFCPLH 
BUFCAMB 


BUFCDDDD 


BUFCORBA 


BUFCCPA 
BUFCBAD 


BUFCNXT1 


BUFCINV 
BUFCWLEN 


BUFCDSPC 
BUFCINV1 


BUFCNLBP 
BUFCNXT2 


BUFXIRBA 


BUFXORBA 
BUFCHAIN 


Description 


The control interval indicated by BUFCDDDD 
must be read 

BUFCBAD is a real address 

The channel program associated with this BUFC 
includes write-validity-checking CCWs 

The RBA that was to be read or written was in 
an extent of the data set that was unavailable 
(for example, not mounted) 

Preformatted channel-program segment is 
complete 


Buffer is fixed in real storage 
Flags: 


Suppress dynamic device reconfiguration on 
errors 

Indicates last BUFC 

For processing with shared resources, a 
operation is in progress-~—the bit is on 
the operation 

For processing with shared resources, a 
operation 18 in progress——the bit is on 
the operation 

No EDB found for RBA 

Reserved 


read 
during 


write 
during 


Address of the placeholder associated with 
this BUFC Cnonshared resources) 


Address of the access method block associated 
With this BUFC (shared resources) 


RBA for input processing (valid only if bit itn 
FLG1 is set) 


RBA for output processing (valid only if IOFL 
indicates that a control interval must be 
written). 

Channel program area address 


Address of the buffer to or from which control 
interval is to be written or read 


Next BUFC for which I/0 can be requested 


Invoker's field for auxiliary storage manager 
BUFC data length 


Address of data~set page-control table 
Invoker's field for DB/DC——-IMS/VS 


Address of the next logical buffer 


Address of the next logical buffer in RBA 
order 


RBA of the record in the buffer or, for a 
spanned record, of the record's first segment 


Same as BUFXIRBA, 


Address of the next BUFC in the pool physical 
chatn 


but used for output 
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Buffer Control Block (BUFC)——Description and Format 


Offset 
Dec (Hex ) 


52034) 
52034) 


56(38) 
60¢03C) 
64040) 
68044) 
72(48) 
7604C) 


7704D) 
80050) 


Bytes and 


Bit Pattern 


0 
4 


ee HL HR HR HE HS 


CLW-—-CLOSE WORK AREA 


Field Name Description 


BUFCNEND 
BUFCMDBT 


BUFCUCUP 
BUFCUCDN 
BUFCNBA 
BUFCPBA 
BUFCSPLH 
BUFCIDAL 


BUFCEND 


End of NSR BUFC 

For shared resources, modification bits-——they 
identify IDs of transactions that have 
modified the buffer (RPL TRANSID operand) 
Address of the next BUFC up the use chain 
Address of the next BUFC down the use chain 
Next BUFC in AMB chain 

Previous BUFC in AMB chain 

Pointer to LSR/GSR PLH 

For processing without shared resources, the 
level of the index record in the buffer-——used 
in the selection of the buffer to be replaced 
Reserved 


Reserved 


The CLW contains information used for communication among the 


CLOSE and temporary CLOSE modules. 


It is built by IDA0200T 


(CLOSE) and IDA0231T (CLOSE, TYPE=T), mapped by IDACLWRK, and 
pointed to by register 4 during VSAM CLOSE processing. 


CLOSE Work Area (CLW)—Description and Format 


Offset 
Dec( Hex ) 


0¢€0) 
8(8) 
12(C) 
16(10) 
28010) 


LY¥26-3907-1 


Bytes and 


Bit Pattern 


8 
4 
4 


Field Name Description 


CLWID 
CLWCOMWK 
CLWAMBPT 
CLWSFI 
CLWFLAGS 


CLWBNOFL 
CLWCNOUP 
CLWNWRIT 
CLWPATH 

CLWSPHCL 
CLWDUMMY 
CLWOUTPT 
CLWPARCL 


CLWPRMCL 
CLWSECCL 
CLWGMAIN 
CLWTERM 

CLWMMSCL 


© Copyright IBM Corp. 


1974,1985 


Work area ID—-IDACLWRK 
Address of common work area 
Address of current AMB 
Subfunction information area 


Flag bytes: 


No buffer flush 

No catalog update 

No write buffer 

Path processing 

Close entire sphere 

Dummy data set 

Base data set opened for output 
Partial close 


Primary close 

Secondary close 

Module work area built 
Terminating error in IDA0200B 
Indicate media manager close 
Reserved 
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The CMB contains the addresses of header elements in the header 
element block that describe storage obtained for the control 
blocks of a key-sequenced or entry~sequenced data set. 


The CMB is pointed to by the AMBL CAMBLCMB). 


It is further 


described under "Virtual-Storage Managemant"™ in "Diagnostic 


Aids." 


Cluster Management Block (CMB)—Description and Format 


offset 
Dec(Hex) 


0¢0) 
1¢1) 
2(2) 
4(4) 


5(5) 


6(6) 
8(8) 
8(8) 
12(C) 
16¢10) 
20(14) 
24(18) 
28(1C) 
32¢20) 
36(24) 
40028) 
44(2C) 
48(30) 
52°34) 
56(038) 
60(3C) 
64(40) 
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Bytes and 
Bit Pattern 


nm & 


po 


| ee oe@e8e¢ 
~XXX XXX 


1 


wm RN 
oa 


ee ee ee ee ee ee ee ee, ee ee > a 


—_ 
NO 


{ 


Field Name Description 


CMBID 


CMBLEN 
CMBFLGS 
CMBOUT 


CMBNST 


CMBCNT 
CMBPTRS 
CMBUSRPT 
CMBPRPTR 
CMBSTPTR 
CMBUSPTR 
CMBFSTPT 
CMBUFSPT 
CMBBFRPT 
CMBUBFPT 
CMBDEBPT 
CMBEDBPT 
CMBPSTPT 
CMBPUSPT 
CMBFXDPT 


CMBRBA 


Control block identifier, X'11' 

Reserved 

Length of the CMB 

Flags: 

The control block structure allows output 
requests 


Reserved 


Number of strings set up in the control block 
structure 


Number of addresses that follow: 

Addresses of header elements in the header 
element block 

User block header 

Protected user block header 

String block header 

Upgrade string block header 

Fixed string block header 

Fixed upgrade string block header 

Buffer block header 

Upgrade buffer block header 

DEB (data extent block) block header 

EDB Cextent definition block) block header 
Protected string block header 

Protected upgrade string block header 
Fixed block header 

Reserved 


VVR RBAs 
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CPA~~CHANNEL PROGRAM AREA 


The CPA contains addresses to CCW chains that perform 


specialized I/0 processing. 


The CPA also contains information 


needed to convert tha addresses of virtual storage data areas to 


real main storage addresses for the channel. 


Each BUFC has a 


CPA associated with it, pointed to by the BUFCCPA. 


Note: 
building and exacution details. 


Sea I/0-management module listings for channel program 


The formats of four channel 


programs follow this description of the CPA. 


Channel Program Area (CPA)~—Description and Format 


Offsat 
Dec (Hex ) 


0¢0) 
ici) 
2¢2) 
4(4) 


8(8) 


12¢C) 


16¢10) 


20(14) 


24(18) 


28¢1C) 


32¢20) 


36 (24) 


36(24) 


37(25) 
37(25) 


39(27) 
43(2B) 
44(02C) 


48(30) 


52034) 


52034) 


LY26-3907-1 


Bytes and 
Bit Pattern 


1 


1 
2 
4 


SP FF HP HOO FF 


Field Name 


CPAID 


CPALEN 


CPAWREAL 


CPAWCPS 


CPAWCPE 


CPAWCKS 


CPAWCKE 


CPARREAL 


CPARCPS 


CPARCPE 


CPAWPHAD 


CPAWSEEK 
CPAWBB 


CPAWCHR 
CPAWPHR 
CPAWSID 


CPAFWCNT 


CPARPHAD 
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Description 

Control block identifier, X'71' 
Reserved 

Langth of tha CPA 


Address of the previous write channel program 
segment 


Address of the first CCW in the write channel 
program segment 


Address of the last CCW in the write channel 
program segment 


Address of the first CCW in the write check 
channel program segment 


Address of the last CCW in the write chack 
channel program segment 


Address of the previous read channel program 
segment 


Address of the first CCW in the read channel 
program segment 


Address of the last CCW in the read channel 
program segment 


Tha physical address for records to be 
written, in the form MBBCCHHR: 


Reserved (M value) 


Seek address: 
BB value 


Cylinder and head address (CCHH value) 
Reserved (record number R) 


Address of the search argument list for write 
channel program segments 


Address of the count fields list for the 
format write channel program segmant 


The physical address for records to be read, 
in the form MBBCCHHR: 


Reserved (M value) 


Data Areas 36? 


Restricted Materials of IBM 
Licensed Materials — Property of IBM 


Channel Program Area (CPA)—Description and Format 


Offset 
Dec (Hex ) 


53(35) 
53 (35) 
55(37) 


59(3B) 
60(3C) 


64(40) 
68044) 
72048) 
76€4C) 


80(50) 
82(52) 
83(53) 


84 
84( 


wi ui 
& 
ws wy 


85(55) 


86(56) 
87(57) 


Bytes and 


Bit Pattern 


6 
2 
4 


- fF LH 


== = —» A 


368 MVS/XA VSAM Logic 


Field Name 
CPARSEEK 
CPARBB 
CPARSID 


CPAIDAL 


CPAVPL 

CPAWORK1 
CPAWORK2 
CPABLKSZ 


CPABCINV 
CPASSECT 
CPASTAT1 


CPAVPLV 
CPAWE 


CPAFLAGS 
CPAFLAG1 


CPAWV 
CPAWCV 


CPARV 
CPAWRPS 


CPARRPS 
CPACHNED 
CPALRCD 
CPACTIG 


CPAFLAG2 
CPAWREPL 
CPARREPL 
CPAXLRA 
CPAPFENT 
CPAWER 
CPARSECT 
CPAWSECT 


Description 
Seek address: 
BB value 


Cylinder and head address (CCHH value) (read 
search-ID argument) 


Reserved Crecord number R) 


Address of the real page list Cindirect 
data-address list) 


Address of the virtual page list 
Work area 
Work area 


The physical block size value calculated by 
the I/0 manager: convert routine 


Number of physical blocks per control interval 
Set sector argument 
Flags: 


The virtual page list (VPL) is valid 

The write channel program has been modified 
for ECKD 

Reserved 


Flags: 


The write channel program segment is valid 
Coreg Se check channel program segment is 
vali 

The read channel program segment is valid 

The write channel program segment (preceded by 
a Set Sector CCW) is valid 

The read channel program segment (preceded by 
a Set Sector (CCW) is valid 

Chaining of the channel program segmants is 
complete 

Last block in CI is the last block on the 
track 

This CI is contiguous with the previous CI to 
be written 


The write channel program segment is used to 
write replicated index records 

The read channel program segment is used to 
read replicated index records 

There has been a LRA instruction error 

The pagefix appendage has been called 
Recursion indicator for define extent 
Reserved 


Set Sector argument—read 


Set Sector argument—write 
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Channel Program Area (CPA)——Description and Format 


Offset 
Dec (Hex ) 


88(58) 
92(5C) 
96(60) 
96(€60) 
112¢€70) 
128(80) 
132(084) 


CHANNEL PROGRAMS 


Bytes and 
Bit Pattern 


4 
4 
40 
16 
16 
4 
4 


Four channel programs (read, 


Field Name Description 


CPANXT1 
CPACPCHN 
CPAECKD 
CPAWDED 
CPAWLR 
CPARBA 
CPALPMB 


Next CPA in chain from AMB 

Next CPA for a particular request (from IOMB). 
ECKD data fields 

Define extent data for write 

Locate record data for write 

RBA to be written 

Address of LPMB 


format write, update write, and 


write check) are used for I/0 operations. 


Read Channel Program 


LY26-3907-1 © Copyright IBM Corp. 1974,1985 


The read channel program is used to retrieve data from 
direct-~access storage. 


Read Channel Program—Description and Format 


CCW 
Number 


Rl 
R2 
R3 


R4 
R52 


Ro 


Com- 

mand Code Flags 

Hex Description Address Hex Description Count 

1B Seek Head CPARSEEK 40 cc 6 

23} Set Sector CPARSECT 60 cc, SLI 1 

31 Search ID CPARSID 60 cc, SLI 5 
Equal 

08 TIC R3 

065 Read Data IDAL 40 cc CPABLKSZ 

864 M-T Read IDAL 40 cc CPABLKSZ 
Data 

035 No op 20 SLI 2 


1 Unless there is RPS (rotational position sensing), R2 is a 


no 


Op. 


R5 is repeated for each physical record per control interval 


that is retrieved. 


R5 uses a Read-Data command for the first physical record, 


R5 uses a Multiple~Track Read-Data command for subsequent 


physical records. 


Rn can be changed to a TIC (Transfer in Channel) command to 


chain to another read channel program. 
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Format Write Channel Program 
The format write channel program is used to preformat or write | 
oore aN a whole track (as in loading a data set with the SPEED J 
option). 


Format Write Channel ProgramDescription and Format 


CCW mand Code Flags 
Number Hex Description Address Hex Description Count 
FW1 1B Seek Head CPAWSEEK 40 cc 6 
FW2 23% Set Sector CPAWSECT 60 cc, SLI 1 
FW3S 31 Search ID CPAWSID 40 cc 5 
Equal 
FW4 08 TIC FWS — — — 
FW52 D ‘a al C, K CPAFWCNT 80 cc 8 
FW6# D dle C, K & IDAL 44 CC, IDAL CPABLKSZ 
Fly 035 No op 20 8=6SsLI 2 


1 Unless there is RPS (rotational position sensing), FW2 is a 
no op. 


2 FW5 and FW6 are repeated (Write Count, Key, and Data) for 
each physical record on a track. 


s FWn can be changed to a TIC (Transfer in Channel) command to ) 
chain to another format write channel program or to a write 
check channel program. 


The following channel programs are built by the block processor 
CIDAL2Z1A2) if the device is ECKD. 


Format Write Channel Program (ECKD)~—Description and Format 


Com- 
CcH mand Code Flags 
Number Hex Description Address Hex Deseription Count 
FW1 63 Define CPAWDED 40 cc 10 
Extent 
FW2 47 Locate CPAWLR 40 cc 10 
Record 
FWS 08 TIC FW5 40 cc 5 
FW4 — — — — — — 
Fui5* 1D hs C, K>, CPAFWCNT 80 cD 
FW6 2 1D ree C, K,> IDAL 44 CC, IDAL CPABLKSZ 
FWn 032 No op 20 SLI 1 


1 FW5 and FW6 are repeated for each physical record. Ata 
track boundary, the multiple-track bit is set in FW5. 


2 FWn can be changed to a TIC (Transfer in Channel) command to 


chain to another format write channel program or to a write 
check channel program. ; 


370 MVS/XA VSAM Logic LY26-3907-1 © Copyright IBM Corp. 1974,1985 


Restricted Materials of 


Licensed Materials ~- Property of IBM 


Update Write Channel Program 


‘ The update write channel program is used to write data on a part 
of a track (as in insertion)... 

Update Write Channel Program—Description and Format 

Com- 

CccwW mand Code Flags 

Number Hex Description Address Hex Description Count 

UW1 1B Seek Head CPAWSEEK 40 cc 6 

UW2* 23 Set Sector CPAWSECT 60 cc, SLI 1 

UW3* 31 Search ID CPAWSID 40 cc 5 

Equal 

UW4 2 08 TIc UW3 

UW52 05 Write Data IDAL 44 CC, IDAL CPABLKSZ 

UWn 03> No op 20 #8SLI 2 

1 Unless there is RPS Crotational position sensing), UW2 is a 
no op. 

2 UW3, UW4, and UW5 are repeated for aach physical record 
indicated in the CPA. The command code for subsequent UW3s 
is Bl, multiple-track search ID equal. 

3 UWn can be changed to a TIC (Transfer in Channel?) command to 
chain to another update write channel program or to a write 
check channel program. 

Update Write Channel Program (ECKD)—Description and Format 

Com- 

ccW mand Code Flags 

Number Hex Description Address Hex Description Count 

UW1 63 Define CPAWDED 40 cc 10 

Extent 
UW2 47 Locate CPAWLR 40 cc 10 
Record 

UW3 08 TIc FW5 40 cc 5 

UW4 — —_— — — —_ —_ 

UW52 85 Multiple- IDAL 44 CC, IDAL CPABLKSZ 

Track Write 
Data 
UWn 032 No op 20 SLI 1 


C 


LY26-3907-1 © Copyright 


UW5 is repeated for each physical record indicated in 
CPABCINY. 


UWn can be changed to a TIC (Transfer in Channel) command to 


chain to another update write channel program or to a write 
check channel program. 
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The write check channel program is used to retrieve data to 
compare it with the data that was previously written. 


Write Check Channel Program—Description and Format 


Ccom- 


6 
1 
5 


CPABLKSZ 
CPABLKSZ 


Code — Flags 
Description Address Hex Description Count 
Seek Head CPAWSEEK 40 cc 
Set Sector CPAWSECT 60 cc, SLI 
Search ID CPAFWCTN? 40 cc 
Equal 

CPAWSID® 
TIC WC3 
Read Data IDAL 50 CC, Skip 
M-T Read IDAL 50 CC, Skip 
Data 
No op 20 SLI 


Unless there is RPS Crotational position sensing), 


CCW mand 
Number Hex 
WCl 1B 
WC2 23% 
WC3 31 
WC4 08 
WC5 064 
865 

WCn 03° 
i 

no op. 
2 CPAFWCNT i 


s used to check a format write. 


CPAWSID is used to check an update write. 
WC5 uses a Read-Data command for the first physical record. | ) 


WC2 isa 


WC5 uses a Multiple-Track Read-Data command for subsequent 
physical records. 


WCn can be changed to a TIC (Transfer in Channel) command to 


chain to a 


nother write check channel program. 


The CSL contains up to 32 entries that describe virtual-storage 


areas acquired by GETMAIN in Open. 


It enables Open to free 


these areas if it detects an error that prevents them from being 


freed in normal Open termination. 


The CSL is used by the Open 


error-cleanup routine as well as by the recovery routine. 


The CSL is pointed to by the BIB. 


as required. 


Core Save List (CSL)—Description and Format 


Offset 
Dec (Hex ) 


0¢€0) 
0(0) 
1¢1) 
4(4} 


Bytes and 
Bit Pattern 


4 


olUhUwWhlUr 
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Field Name Description 


CSLRO 
CSLSUBPL 
CSLLENTH 
CSLID 


Used to load register 0 for FREEMAIN 
Subpool number of the CSL 

Length of the CSL 

Identifier: * IDACSL ' 
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Core Save List (CSL)—Description and Format 


Offset 
Dec (Hex) 


12¢C) 


16¢10) 
18¢€12) 
19(13) 
20(14) 


CSL Entry 


000) 
0¢0) 
0¢0) 
i¢1) 
4€4) 
8(8) 


909) 


Bytes and 
Bit Pattern 


4 


Field Name Description 


CSLNXPTR 


CSLACTEN 
CSLGSRK 


CSLNTRYS 


CSLENTRY 
CSLFREMN 
CSLPOOLN 
CSLCORLN 
CSLCORPT 
CSLFLAGS 
CSLKEY5 

CSLGSRKT 
CSLJSTCB 


CSLANCPT 


DIWA-~DATA INSERT WORK AREA 


Address of the next CSL (zero for the last CSL 
in the chain) 


Number of active entries 
GSR key 
Reserved 


Entries for virtual-storage areas: 


An entry for a virtual-storaga area: 
Information for FREEMAIN 

Subpool number of the virtual-storage area 
Length of the virtual-storage area 

Address of the virtual-storage area 

Flags: 

The storage is in key 5 

The storage is in GSR key 

The storage is in key 0O or the key of the 
problem program 


The storage is owned by the job-step TCB 
Reserved 


Address of the CMB location that contains the 
address of the header element tn the HEB for 
the virtual-storage area, or zero 


The DIWA is a work area used by the control area and control 


interval splitting modules. 


AMB CAMBIWA). 


The DIWA is pointed to by the data 


Data Insert Work Area (DIWA)—Description and Format 


Offset 
Dec (Hex ) 


0¢0) 
1¢1) 


2(2) 
4(4) 
4¢€4) 


LY26-3907-1 


Bytes and 
Bit Pattern 


1 
1 


eS &» DB NW 


Field Name 


DIWID 
DIWATV 


DIWLEN 
DIWCSWRD 
DIWFLG1 
DIWCAS 


DIWCISPL 
DIWPFERR 


© Copyright IBM Corp. 
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Description 

Control block identifier, X"'41" 

Test-and-set (TS) assembler instruction is 
issued against this field to obtain exclusive 
use of the DIWA 

Length of a DIWA in bytes 

Compare and swap word 

Flag byte 1: 

Control-area split is in progress 


Control-interval split has been performed 
If7Q error occurred during preformatting 
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Data Insert Work Area (DIWA)—Description and Format 


offset 
Dec (Hex) 


5(¢5) 


6(6) 
7¢7) 
8(8) 


12(C) 


16¢€10) 


20¢14) 


24(18) 
24(18) 


28(1C) 
28(1C) 
28(1C) 
32(20) 
36(24) 
40(28) 
40(28) 
44(2C) 
48(30) 
52(34) 
56(38) 
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Bytes and 
Bit Pattern 


nh 
oS 


ne ee ee ee ee ee 


Field Name Description 


DIWEOKR 


DIWGSPC 
DIWSHIFT 
DISNOTI 


DIWIST 


DIWFLG2 
DIWFSPF 
DIWDFR 


DIWIXEX 
DIWOWN 


DIWSHRCT 


DIWLRBA 
DIWHRBA 
DIWPLH 

DIWBUFC 


DIWRDFSP 
DIWSPLTP 


DIWSAVE 

DIWSAVE1 
DIWDTASP 
DIWSAVE2 
DIWSAVES 
DIWSAVE4S 
DIWRDFCT 
DIWSAVES 
DIWRKCT 

DIWINRBA 
DIWFSRS 


Key of a record to be inserted in a key-range 
data set is greater than the highest possible 
key in the current key rangethis 
end-of-key-range condition causes a 
control-interval split 

Spanned record needs a new control area 

There is a shift in the insert point 

The buffer had intermediate or last segment of 
@ spanned record 

The buffer had first or intermediate segment 
of a spanned record 


Flag byte 2: 

Preformatting is needed in a VSAM data set 
(LSR or GSR) and DER 

Index under EX control 

DIWA obtained by IDACLRRC 

Reserved 

Index shared use count 

Reserved 


Address of the first control interval ina 
control area that is being split 


Address of tha last control interval in a 
control area that is baing split 


Address of the PLH which is currently 
associated with the DIWA 


Address of the BUFC that controls the insert 
work buffer 


Pointer to split RDF 

Address of the RDF associated with the first 
record to be moved to a new control interval 
as a result of a control-interval split 
Register save area: 

Register 1 

Data split point 

Register 2 

Register 3 

Register 4 

Control-interval split RDF count 

Register 5 

Counter for RK 

Insert control-interval RBA 


First spanned RCD segment 
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Data Insert Work Area (DIWA)—Description and Format 


offset 
Dec (Hex ) 


60(¢3C) 
60¢35C) 


61¢3D) 
62(3E) 
63¢3F) 
64(40) 


Bytes and 
Bit Pattern 


—=- — ee pee gh 


DSL~““DEB SAVE LIST 


offsat 
Dec (Hex) 


0¢0) 
1(1) 
404) 
12¢C) 


16(10) 
18¢12) 


20¢14) 
20¢14) 


21(¢15) 


LY26-3907~-1 


Field Name Description 

DIWFDBSV RPL feedback save area 
DIWFUNCD Saved function code 
DIWERREG Saved register 15 value 
DIWCMPON Saved component ID 
DIWERRCD Saved qualifier code 


Reserved 


The DSL contains up to 16 entries that describe DEBs that have 
been successfully chained and added to the DEB table. t 


enables Opan to free the DEBs if an error prevents them from 


being freed normally. The DSL is used only by the Open 


error-cleanup routine, not by the recovery routina. 


The DSL is pointed to by OPWA (called the ACB work area). 
Additional DSLs ara chained as required. 


DEB Save List (DSL)—Deseription and Format 


Bytes and 
Bit Pattern 


1 


3 
8 
4 


x 16 


ef NN NN 


MKKK KKK. 


Address of the next DSL (zero for the last DSL 


Field Nama Description 
DSLSUBPL Subpool number of tha DSL 
DSLLENTH Langth of the DSL 
DSLID Identifier: " IDADSL ' 
DSLNXPTR 
in the chain) 
DSLACTEN Number of active entries 
Reserved 
DSLENTRY Entries for DEBs: 
DSLFLG Flags: 
DSLFDDEB pee a dummy DEB 
DSLDEBAD Address of the DEB 
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EDB-—-EXTENT DEFINITION BLOCK 
The EDB describes all extents of the space allocated to the 


Offset 
Dec (Hex ) 


EDB Header 
0(0) 
0¢0) 
1¢1) 
2(2) 


4(4) 
4(4) 


8(8) 
EDB Entry 
0¢24) 
0¢0) 
2(2) 


3¢3) 


4(4) 
8(8) 
8(8) 
10CA) 
12(C) 
16¢10) 


20¢14) 
20(14) 


21¢15) 
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The EDB is built by the VSAM Open routine 


from information in the data set's catalog record. 


The EDB header contains the length of the EDB and the number of 


EDB 


entries that follow the header. 


Each EDB entry describes an 


extent, and contains the address of the associated LPMB. The 
EDB header is pointed to by the AMB CAMBEDB). 


Extent Definition Block (EDB)—Description and Format 


Bytes and 
Bit Pattern 


o £82 NH FF FF CO 


ece = - A 


e G=_ite 
e e e 
e e e e 
Pe co 8 


XX. XX. 


= 


aU PP FF SP HM NN LF 


IDAEDBHD 
EDBID 
EDBNO 
EDBLEN 


EDBLPMBC 
EDBNEXT 


EDB1ST 


IDAEDB 


EDBFLG1 
EDBLKR 
EDBECKD 


EDBDECKD 
EDBACTIV 


EDBM 


EDBLPMBA 
EDBSTTRK 
EDBSTT 
EDBETT 
EDBLORBA 
EDBHIRBA 
EDBUCBA 


EDBUCBAD 


Field Name Description 


EDB Header 

Control block identifier, X"'90° 

Number of EDB entries—one EDB per extent 
Length of an EDB entry in bytes 


Address of first LPMB 
Address of next EDB, media manager only 


First EDB extent 


EDB Entry 

Reserved 

Flags 

For a catalog, low-key range 

ECKD device 

Define extent only ECKD device 

O-entry describes an extent, l=exteant not 
available 

Reserved 


Extent number—specifies the relative location 
of an extent entry ina DE 


Address of LPMB 

Relative track address of the extent 
associated with this EDB 

First track of extent 

Last track of extent 

RBA of the start of the extent 

RBA of the end of the extent 


Address of UCB 
Reserved 


UCB Address 
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ESL~-ENQUEUE SAVE LIST 


( The ESL contains up to 16 entries that describe ENQ requests 
that have been issued by Open, Close, or End of Volume for data 
set sharing. It enables Open to dequeue the indicated resources 
if an error prevents them from being dequeued normally. The ESL 
is used only by the Open error-cleanup routine, not by the 
recovery routine. 


The ESL is pointed to by OPWA (called the ACB work area). 
Additional ESLs are chained as required. 


Enqueue Save List (ESL)—Description and Format 


Offset Bytes and ; 
Dec(Hex ) Bit Pattern Field Name Description 
0¢0) 1 ESLSUBPL Subpool number of the ESL 
1¢1) 3 ESLLENTH Length of the ESL 
4(4) 8 ESLID Identifier: "IDAESL’ 
12¢C) 4 ESLNXPTR Address of the next ESL (zero for the last ESL 
in the chain) 
16(10) 2 ESLACTEN Number of active entries 
18¢12) 2 Reserved 
20¢(14) 4 ESLCACB Catalog ACB address 
24(18) 784 ESLENTRY ENQUEUE entries 
24(18) 1 ESLENQOP ENQUEUE option for this entry 
25(19) 3 ESLRNLEN ——- RNAME_ lengths 
a 25¢€19) 1 ESLRLN Length of RNAME 
26(1A) 1 ESLDSLN Length of data set name 
27(1B) 1 ESLCATLN Length of catalog name 
28¢€1C) 1 ESLRNIND RNAME indicator I=input, O=output 
29(1D) 44 ESLDSN Data set name 


C 


EXLST--EXIT LIST 


LY26-3907-1 


The EXLST contains the addresses of exit routines supplied by 


the user. 
macro. 


It is created by the user with the EXLST or GENCB 


The EXLST is pointed to by the ACB CACBEXLST). The 
sacl ney reside above 16 megabytes if the caller's addressing 
mode 1s 31. 
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Exit List (EXL8ST)—Description and Format 


Offset 


Dec (Hex) 


0¢0) 
1¢1) 


2¢2) 
4(4) 
5(5) 
6(6) 
10¢A) 
11¢B) 
15¢F) 
16¢10) 
20614) 
S0C1E) 
S1C1F) 
35(235) 


ay res and 
Bit Pattern 


1 
1 


- PP FP PSP FP KF BP FY FS ND 
[= | 


EXTWA="EXTEND WORK AREA 
The EXTWA describes the work area for VSAM end of volume. 
Un EXTWA is pointed to by RWORK Cregister 13) and is in subpool 


Fiald Name Description 


EXLID 
EXLSTYP 


EXLLEN 


EXLEODF 
EXLEODP 
EXLSYNF 
EXLSYNP 
EXLLERF 
EXLLERP 


EXLJRNF 
EXLJRNP 


Control block identifier, X'8l1' 
Subtype identifier: 


X'10" = VSAM 
X'20' = VTAM 


Length of the control block 
Reserved 

Entry description 

Address of the EODAD exit routine 
Entry description 

Address of the SYNAD exit routine 
Entry description 

Address of the LERAD exit routine 
Reserved 

Entry description 

Address of the JRNAD exit routine 


Reserved 


Extend Work Area (EXTWA)—Description and Format 


offset 


Dec (Hex) 


12¢C) 
72¢648) 
136(88) 
140(8C) 
144090) 


Bytes and 
Bit Pattern 


1248 
72 

4 

4 

4 

60 


64 
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Field Name Description 


EOVSAVEA 
EOVPRVSA 
EOVNXTSA 
EOVREGSV 
EOV7BSAV 
EOVSAV1 
EOVSAV2 
EOVSAVS 


Save area must be at beginning of workarea 
Reserved for PL/i 


Previous save area 
Next save area 
Registers 14-12 

Save area for IDA0557B 
Level 1 return address 
Level 2 return address 


Level 3 return address 
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Extend Work Area (EXTWA)——Description and Format 


Offset Bytes and 
Dec (Hex) Bit Pattern Field Name Description 
148(94) 4 EOVSAV4¢ Level 4 return address 
152¢€98) 4 EOVSAVS5 Level 5 return address 
156(9C) 4 EOVSAV6 Level 6 return address 
160CA0) 20 LOCKSAVE Save area for registers 
160CA0) 20 11-15 used by setlock 
180(B4) 4 EOVGFLN GETMAIN/FREEMAIN length 
180(B4) 1 EOVGFSP Sub-pool value 
181(B5) 3 EOVGFLEN Length 
184(B8) 4 EOVRCORE SVC 55 work area address 
188 (BC) 4 EOVAMS Requested AMB address 
192¢(C0) 4 EOVEDBPT Printer to EDB 
196(C4) G EOVINDEX Index for AMBCHK 
200(C8) 4 EOVMVM Full word on a word 
200(C8) 1 EOVSWM More switches 

i ieee EOVLOOP1 Loop control for AMBCHK 

Be ee EOVSSWIX SSW and index switches 

: EOVNOPRI Primary allocation would cause RPA wraparound 
EOVNOSCN Secondary allocation would cause RBA 
wraparound 
abe EOVVATE@ AMBLECHAIN enqueue switch 
~111 Unused, available 
201(C9) 3 Unused, available 
204(CC) 4 EOVAMBL1 AMBL printer for AMBCHK 
208¢(D0) 4 NXTDEBAD Used for DEB chaining 
212¢(D4) 8 MAINSAVE Save area for registers 3 and 4 used by BR 
REGMAIN 

220(DC) 4 EOVPLHRM Record management-PLH entry 
224(E0) 4 EOVPLHPT PLH entry pointer 
228(E4) 8 EQVPLHDR PLH header pointer 
236(EC) 4 EOVRPL Preformat dummy RPL 
240CF0) 4 EQVMRPL Save header RPL 
2440 F4) 4 EOVCRPL Save current RPL 
248CF8) 4 EOVIOBPT IOB pointer 
252CFC) 4 EOVIOBF Failing IOB 
256¢(100) 4 EOVIOBS Starting IOB 
260(104) 4 EOVAMBPT Pointer to AMB 
264(108) 4 EOVVDSPM Pointer to VVDS parm 
268¢€10C) 4 EOVVDSEN Pointer to VVDS RBA entry 
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Extend Work Area CEXTWA)—Description and Format 


offset 
Dec (Hex ) 


272(110) 
2760114) 
280¢118) 
284(11C) 
288(120) 
292(124) 
2960128) 
5080134) 
314013A) 
316¢€13C) 
320(¢140) 
392(188) 
396(18C) 
398C18E) 
399C18F) 
400(¢190) 


404(194) 
4040194) 


408(198) 
408(198) 
C) 


41219 

412¢€19C) 
412¢019C) 
412(19C) 
416C1A0) 
416(1A0) 
416¢€1A0) 
420¢€1A4) 
424(1A8) 
430C1AE) 
432(1B0) 
434(1B2) 
436(1B4) 
440¢01B8) 
444(1BC) 


448(1C0) 


Bytes and 
Bit Pattern 


4 


&- fF HE HE HF 


+f fF NUN NN NHN OG HP HHP LHHPHPH HH HH fH FP FP PF HL AW 
nN 


~~ 
oa 
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Field Name 


EOVVR 
EOVPADR 
EOVPLEN 
EOVSADR 
EOVSLEN 
EQVHARBA 
EOVBUFAD 
EOVBUFLN 


EOVVATPT 
EOVSAREA 
EOVCOUNT 
EOVKEYLN 


EQVEOVR 
EQVEOVPT 


EOVARDB1 
EOVLEDB 


EOVARDB2 
EOVLEDBE 


EOVARDB3 
EOVNEDB 

EOVHEBPT 
EQVVMTP 

EOQVARDB4 
EOVNEDBE 
EOVTEMP 

EOVRBAWK 
EOVVOLWK 
EOVNVOL1 
EOVNARD1 
EOVNARD2 
EOVCPWA1 
EOVCPWA2 
EOVCBLPT 


EOVCBL1 


Description 

Pointer to VVR 

Primary work area address 
Primary work area length 
$S work area address 

$S work area length 

High allocated RBA 

Extra buffer address 
Buffer lengths 

Word alignment 

Pointer to VAT 

Save area for VVDS manager 
Index 

AMDSB key length 

Reserved 

EOV request 

EOV input RBA or key 


ARDB that space was requested was for 
Last EDB on chain 


EOD ARDB 
Last extent on EDB chain 


Save ARDB1 

New EDB 

HEB pointer 

VMT pointer 

Save ARDB2 

New EDB extent 

Temporary 

ARDB work RBA 

ARDB work volume serial number 
Number of volume entries 

Number ARDB*'s for requested AMB 
Number ARDB'‘'s for 2nd AMB 
Checkpoint work area address-requested AMB 
Checkpoint work area work pointer 


Control block list pointer 
Control block list request AMB 
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Extend Work Area (EXTWA)——Description and Format 


Offset 
Dec (Hex ) 


464(1D0) 
480(C1E0) 
480(1E0) 
482C1E2) 


484(1E4) 
488(1E8) 
492C1EC) 
496(01F0) 
500C1F4) 
504¢01F8) 
504(1F8) 
507¢C1FB) 
508C1FC) 
512¢200) 
516 (204) 
520(208) 
524(20C) 
525(20D) 
526 (20E) 


527(20F) 


528(210) 
529¢€211) 
530(¢212) 
531¢213) 
5320214) 
5320214) 
533(¢215) 


534(216) 
535(217) 


LY26-3907-1 


Bytes and 
Bit Pattern 


16 


4 
2 
2 
4 
4 
PA 
4 
4 
4 
3 
1 
4 
4 
4 
PA 
1 
1 
1 

Lowe: Bats 

ae ear eee ar 

dle, vated 

pg. ease 

ie, Aewiese 

fe eee 

eed 

: seat 
1 

eae 


ee eee 
~ell 1111 


ol edd oll ol > Oe 


Field Name 


EOVCBL2 
EOVRRNO 
EOVRRNOL 
EOVRRNO2 


EOVLPMB 
EOVNEWCB 
EOVSUCB 
EOVDUCB 
EOVEDB 
EQVECB 
EOVECBCC 
EOVDOCTR 
EOVDOCT1 
EOVDOCT2 
EOVDOCTS3 
EQVDVMOD 
EOVDEBSZ 
EOVSW 
EOVMNID 
EOVCAND 
EOVVOLSW 
EOVDOSW 
EOVZ2AMBS 
EOVNDEB 


EOVENQ 
EOVRSERR 


EOVSW2 
EOVOVFSW 
EOVEXIT 
EOVERR 
EQVNMEXT 
EOVMCTR 
EOVRPOOL 
EOVPROBD 
EOVPDCDE 


EOVFUNC 
EOVSFC 


Description 


Control block list second AMB 


Relative repetition 
Relative repetition 
occurrence 


Relative repetition 
volume occurrence 


LPMB address 

New EDB/DEB address 
Success UCB 
Dismount UCB 

EDB pointer 

ECB 

ECB completion code 
Do loop counter 


Do loop counter. 


DEB file mask 


numbers 
numbers of data set volume 


numbers of sequential sat 


DEB number of double words 


EQOV switches 
Volume was mounted 
Candidate volume 


Allocate volume switch indication 


Do loop control 
Two AMB’s processed 
New DEB switch 


Task already enqueued 


Reset error 


End of volume switches Byte 2 
Overflow volume exists 
The data set is divided into key ranges 


Reserved 


End of volume error 


Current number DEB extents 


DEB M counter 


Unused 


End of volume PD parm list 


Problem DET code 


End of volume function code 
End of volume subfunction code 
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Extend Work Area (EXTWA)——Description and Format 


Offset 
Dec (Hex) 


536(218) 
540¢021C) 
5440220) 
548(224) 
5520228) 
556(22C) 
557(22D) 


560¢230) 
560(230) 


608(260) 
608(260) 
608(260) 


609¢261) 


610(262) 
612(264) 
616(268) 
620(26C) 
624(270) 
628(274) 
632(278) 
1032¢408) 
1048(418) 


1048(418) 
1048(418) 


1049(419) 
1052(41C) 
1056(¢420) 
10606424) 
1064(428) 
1076(0434) 
1124(464) 
11240464) 


11240464) 
11240464) 
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Bytes and 


Bit Pattern 


Field Name Description 


EOVPALOC 
EOVPATRK 
EQVSALOC 
EOVSATRK 
EOVHIRBA 
EOVMMSFL 
EOVCBONL 
EOVVOLL 
EOVIRTL 
EQVSMFPL 
SMFPL 
SMFID 
SMFFLG 


SMFVOLSW 
SMFOUTSP 


SMFAMB 
SMFDSNAM 
SMFAQTY 
SMFCTNAM 
SMFTIOT 
EOVRNLST 
EOVLOCDS 
EOVREL2 
REL2 
BITBANK 


CATERB 
HEBHIT 


CTR 
AMBLPT 
HEBPT 
SFIAREA 
EOVEN@PL 
EOVCAT 
CATDATA 


CATWD 
CATID 


Primary allocation in bytes 
Primary allocation in tracks 
Secondary allocation bytes 
Secondary allocation-tracks. 
High allocation RBA in data set 
MMS flags 

Control block update only 
Reserved 


Volume mount volume list 
Core for IDAVIRT list 


SMF parameter list 

Record identifier 

SMF flags 

Reserved 

Volume switch 

Out of space 

Reserved 

AMB pointer 

Data/Index set name pointer 
Number of tracks 


Catalog name pointer 


TIOT pointer 


Pointers to data from catalog 
Release 2 delta 

Miscellaneous bits 

Catalog error occurred 

HEB scan switch 

Reserved 

Miscellaneous counter 

Pointer to AMBL 

Printer to HEB 

12 byte SFI area 
Enqueue/Dequeuve parameter list 
Catalog data 

Catalog data 


IDA0192C interface 
Request ID 
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Extend Work Area (EXTWA)—Description and Format 


Offset 
Dec (Hex ) 


1125(465) 
11280468) 
1132¢46C) 
1138(472) 
11400474) 
1144(0478) 
1148(047C) 
1152¢480) 
1156(484) 
11600488) 
1164(48C) 
1168(490) 
1172(0494) 
11740496) 
1176(0498) 
11770499) 
1184(4A0) 


1228(4CC) 
1228(4CC) 


1232¢04D0) 
1232(4D0) 


1233(4D1) 
1234(04D2) 


1235(4D3) 
1236(4D4) 
1240(4D8) 
1244(4DC) 


Bytes and 


Bit Pattern 


3 


Aree NN FP HH RH fF HF BH BH HH A A 


 -) 
>) 


- LP HL 


Field Name 


CATSFIPT 
CATHARBA 
CATVOLS 
CATWSZ 
CATWPTR 
CATFPTR 
CATLSTSZ 
CATNEWA 
CATXINT 
CATRXTNT 
CATXLNG 
CATXFLNG 
CAINMEXT 
CATRC 
CATXTYP 
CATSSDAT 
CATDEV 
EOVDSNAM 


MWAEQPRM 
MWAEQTCB 


MWAEQENT 
MWAEQOP1 
MWAEQEND 
MWAEQDIR 
MWAEQRNM 
MWAEQOP2 
MWAEQRET 
MWAEQRTC 
MWAEQQAD 
MWAEQRAD 
MWAEQUCB 
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Description 

Pointer to SFI area 

High allocation RBA 

Volume serial number 

Catalog work area size 
Catalog work area pointer 
Catalog field list pointer 
Size of catalog lists 

New catalog work area pointer 
Catalog extents address 
Catalog extents pointer 

Total length of extents 

Total length of extent field data 
Catalog number of extents 
Catalog return code 

Extent type of RBA for mount 
Sequence set with data 

Device type save 

Data set name save area 


AMBLCHN Enqueue/Dequeue parameter list 
TCB address 


Enqueue entry 

First option byte 
Last entry indicator 
not used in this case 
Directed enq. deq. 
Length of RNAME 
Option byte 2 
Reserved 

Enqueue return parameters 
Enqueue return code 
QNAME address 

RNAME address 


UCB address 


Data Areas 


383 


Restricted Materials of IBM 
Licensed Materials ~ Property of IBM 


HEB-HEADER ELEMENT BLOCK 


and free unprotected storage blocks. It contains 16 header 
elements, each of which describes a storage block. It is 
furtner described under "Virtual-Storage Management" in 
"Diagnostic Aids." 


The HEB is pointed to by the BIB (BIBHEBPT). The first free 
header element is pointed to by BIBHEBFQ. 


The HEB is used by VSAM virtual-storage management to allocate ) 


Header Element Block (HEB)—Description and Format 


Offset Bytes and 
Dec (Hex) Bit Pattern Field Name Description 
HEB Block 
Definition 
0¢0) 1 HEBID Control block identifier, X'13'° 
1¢1) 1 Reserved 
2(2) 2 HEBLEN Length of the HEB Cincluding header elements) 
4(4) 4 HEBNHEB Address of the next HEB Cor 0) 
8(8) 2 Reserved 
LOCA) 2 HEBCNT Number of header elements 
12¢C) 20 x 16 HEBHDELS Header elements: 
HEB Header 
Element 
Definition 
0¢0) 8 HEBFREMN Information for freeing the storage block 2 
described by this header element: 
0¢0) 1 HEBSP Subpool in which the storage block is located 
1¢1) 3 HEBLN Length of the storage block 
4(4) 4 HEBBLKPT Address of the storage block 
8(8) 1 HEBFLAGS Flags: 
Dite.%: * ed HEBJSTCB The storage is owned by the job step TCB 
Bees. se HEBKEYS5 The storage 18 in key 5 
Steve: 26.8 HEBGSRKT The storage is in GSR key 
600 .- ax Storage is obtained in key 0 
Lieceal:. Selene HEBIOSUP O/C/EOV special request block 
ee eres HEBRTFLG Recovery termination freed storage 
ee 9 OX Reserved 
9¢9) 3 HEBAVSP Amount of space available in the storage block 
12¢C) 4 HEBELCHN Address of the next header element 
16¢10) 4 HEBNBYTE Address of the next available byte 


J 
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ICHWA--INDEX CREATE WORK AREA 


The ICWA contains information needed when a VSAM index record is 
being built or modified during key~sequenced data set creation. 
The sequence-set ICWA is pointed to by the index AMB CAMBIWA). 
pace are built by Open; there is one for each level of the 
index. 


Index Create Work Area (ICWA)—Description and Format 


Offset Bytes and 
Dec(Hex) Bit Pattern Field Name Description 
0¢0) 1 ICWID Control block identifier, X'43' 
1¢1) 1 ICWFLG1 Flag byte: 
Decks: Sede I CWWNF Entry won't fit in the index record 
a eae oe ICWWAGM The Open routine did not supply a work area 
lia. tenes ICWRBAOK Don't get RBA on initial 
gee Aveo ICWVSE The section entry is valid 
re eee ICWVNE The previous entry is valid 
bse tes Gigi ICWKRDS The data set is divided into key ranges 
ee ees ICNSPLIT The work area contains a split index record 
Ss eee ICWENDRQ Tha Close routine requires a control interval 
split 
2(2) 2 ICWLEN Length of the ICWA 
4(4) 4 ICWCHN Address of the next ICWA 
8¢8) 4 ICWBUFC Address of the current index BUFC 
12¢C) 4 ICWCRBA Current index RBA 
16¢10) G ICWPRBA Previous index RBA 
20¢14) 2 ICWPSEO Displacement from the beginning of the index 
record to the prior section antry 
22(16) 2 ICWSCNT Number of entries in the current section 
24(18) 4 ICWADD Address of the current work area 
28(1C) 4 ICWTBASE Base RBA 
32¢20) & ICWTPTR Address of the index save position 
36(624) & ICWARDBP Address of the current ARDB 
40¢28) 2 ICWLN Index level number 
462(2A) 2 ICWKEYILL Length of the current key 
44(2C) 2 ICWKEY2L Length of the previous key 
46(2E) 2 ICWKEY3L Length of the section key 
48(¢30) 2 ICWNEST Number of entries in the index section 
50¢€32) 2 ICWNOSEG Number of segments in a spanned record 
52(34) 2 ICWCRSEG Number of the segment being processed 
54036) 1 ICWREQ Request type 
55(€37) 1 ICWPTL Index entry pointer length 
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Index Create Work Area (ICWA)—~Description and Format 


Offset 
Dec (Hex) 
56038) 
57(€39) 
58(3A) 


59(3B) 


60(3C) 
VL 
VL 


Bytes and 
Bit Pattern 


1 


Ckey length) 
(key length) 
(key length) 


Field Name 


ICWCER 


ICWCEF 


ICWCEL 


ICWCERP 


ICWKEY1 
ICWKEY2 
ICWKEY3 


IDAENQRN~"ENQUEUE/DEQUEUE RNAME 
The IDAENQRN describes the RNAME structure for VSAM data sets 
cataloged in the VSAM or Integrated Catalog Facility CICF) 

catalog. 
IDAENQRN is in subpool 252 and key 0. 


ENQUEVE/DEQUEUE RNAME (IDAENQRN)——Description and Format 


offset 
Dec (Hex ) 


0¢€0) 
0(¢0) 
0¢0) 
0¢0) 
22(16) 


Bytes and 
Bit Pattern 


100 
VL 
22 
3 
22 


Description 


Rear compression count of the current index 


entry 


Current index entry F--number of front-key 


compressed bytes 


Current index entry L-—length of the 
compressed key in the entry 


Rear compression count of the previous index 


entry 
Save area for the current key 
Save area for the previous key 


Save area for the section key 


Field Name Description 


IDAENQRN 
ENQDSN 
ENQDSNI 
ENQRNCI 
ENQDSN2 


Enqueue/Dequeue RNAME 
Data set name 

First half data set name 
Three-byte CI number 


Second half data set name 


The following field is at offset ENQDSLN 


VL 


ENQCATNM 


Catalog name 


The following structure is at offset CENQDSLN + ENQCATLN) 


a ee 7 ee 
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ENQRN 
ENQDEQRN 
ENQRNLEN 
ENQRLN 
EN@DSLN 
ENQCATLN 


RNAME length and indicator 
RNAME lengths 
Length RNAME 
Length DSNAME 


Length catalog name 
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3(¢3) 1 ENQRNIND Control character 0 = Output I = Input B = 
Busy 
404) 8 ENQSNAME System name for VSI processing 


IDAVIRT“"VIRTUAL DEVICE PARAMETER LIST 
The IDAVIRT is the virtual device parameter list. It contains 
information which is used to acquire and relinquish extents on a 
virtual device. 
IDAVIRT is in subpool 252. 


Virtual Device Parameter List CIDAVIRT)——Description and Format 


offset Bytes and 
Dec (Hex) Bit Pattern Field Name Description 
0¢0) 24 IDAVIRT Stage virtual device parameter 
0¢0) 1 Reserved 
1¢1) 1 VIRTFLAG Flags for options 
Leacs oa VIRTAC@ Perform an acquire 
eee ‘ VIRTINHB: Inhibit staging or destaging 
mae ben - VIRTNOUN Do not unbind or release 
Bhan. Sceueue VIRTBACB Acquire or release by ACB 
Boe Meret te VIRTBUCB Acquire or release this UCB 
ida. eldece VIRTBEXT Acquire or release by extent list 
en ae VIRTMNT Volume just mounted 
sr aiet a VIRTMMS MMS request 
2(2) 2 Reserved 
6(4) 4 VIRTACB Pointer to ACB for data set 
88) 4 VIRTUCB Pointer to UCB to acquire or release 
12(C) 4 VIRTEXT Pointer to extent list 
16¢10) 4 VIRTTIOE Pointer to TIOT entry 
20¢14) 2 VIRTLENG Langth of extent list 
22(16) 2 Reserved 


IDAVVOL~"VOLUME LIST FOR VSAM VOLUME MOUNT 
The IDAVVOL is the volume list for VSAM volume mount. It 
contains information for mounted volumes. A volume list (VVOL) 
is built for each device type. 
IDAVVOL is in subpool 252. 


Volume List for VSAM Volume Mount (CIDAVVOL)—Description and Format 


Offset Bytes and 
Dec (Hex) Bit Pattern Field Name Description 
0¢0) 36 IDAVVOLL Volume List 
0¢0) 1 

1 adie Must be zero 
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Volume List for VSAM Volume Mount (IDAVVOL )—Description and Format 


Offset 
Dec (Hex) 


1¢1) 
2¢2) 
4(4) 
8(8) 


12¢C) 
12¢C) 


13¢(D) 
14(E) 
15(¢F) 
16(€10) 
28(1C) 
32(¢20) 


36(24) 
36024) 


40(28) 


42¢02A) 


Bytes and 

Bit Pattern Field Name 

glee. + cavelece VVOLLID Indicates volume list 

RSLS aes VVOLLTIO Indicates VUCBL created 

Se eu ee VVOLLOPE Called by open 
Pere: Seer VVOLLEOV Called by end of volume 

Sal tens VVOLLCAT Called by catalog 
gag VVOLLSWD Sequence set with data 
ee VVOLLMMS Called by media manager 

1 

2 VVOLLNBR Number of volser entries 

4 VVOLLTAB Pointer to TIOT DD entry C(TIOE) 

4 VOLLACB Pointer to catalog ACB 

4 VVOLLERR Return code 

1 VVOLLPDC Problem DET error code 

1 VVOLLFNC Function code 

1 VVOLLSFC Sub-function code 

1 VVOLLCNT Volume count 

12 VVOLLSFI Sub~-function information area 

4 VVOLLBIB Pointer to BIB 

4 VVOLLDEB Pointer to DEB 

0 VVOLLENT 

4 VVOLLUCB 

2 

Deetieg> ate VVOLLMNT Indicates volume mounted 

dates tee a % VVOLLVFY Volume is verified 

7 XM XXXK Reserved 

6 VVOLLVSR Volser for volume 


Description ) 


Printer to UCB used . ) 


IICB“"ISAM INTERFACE CONTROL BLOCK 


The IICB is used to address the DCB (ISAM) and the ACB and RPL 
CVSAM) control blocks and associated areas needed by the ISAM 


interface. 


The IICB is pointed to by the DEBWKPT5 field in the 


ISAM DEB to provide integrity and by the RPLIICB field in the 


RPL Extension to provide the connection to VSAM control 


programs. 


ISAM Interface Control Block (IICB)——Description and Format 


offset 
Dec (Hex) 


0¢0) 
1¢1) 
2(2) 
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Bytes and 

Bit Pattern Field Name Description 

1 IICBID Control block identifier, X'80' 
1 Reserved 

2 TICBLEN Length of IICB, in bytes 
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ISAM Interface Control Block (IICB)——Description and Format 


Offset 


Dec (Hex ) 


4(4) 
8(8) 
12¢C) 


16¢10) 
16¢€10) 


18(€12) 
20¢19) 
24(18) 


25(19) 
28(1C) 


29C1D) 
32020) 
34022) 


36(24) 


37(25) 
40¢28) 
44020) 
45(2D) 


48(30) 


Bytes and 
Bit Pattern 


4 


4 
4 
3 
2 
2 
4 
1 
1 


tad 


1 


XXX KKXX 


3 
46 
1 
3 


Field Name Description 


IIDCBPTR 
IITACBPTR 
IIRPLPTR 


IIWICBF 
TISAVLRL 


TIMAXLRL 
IIKEYPT 
IIFLAGI 
IIFSCAN 
IIFGET 
IIFPASS 
IIFCLOSE 
IIDATA 
IITFTEST 
TISEQCHK 
TIQBFRS 
ITACBL 


IIFLAG2 


MRKP 
MLRECL 
MBLKSI 
MOPTCD 
MRECFM 
MBUFL 
MBUFNO 
MKEYLE 
TIRPLL 
IIKEYSL 


IIBUFL 


IIFLAGS 
MBFALN 


IIMSGL 
IIMSGPTR 
IIBUFNO 
IITBUFL 


IISVCLST 
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Address of DCB 
Address of ACB 
Address of RPL 


Address of dummy scan work area 
Length of current record 


Maximum record length 
Address of key Cdummy ISAM) save area 
ISAM interface status flags: 


Scan mode 

First GET request 

First pass in load mode 

Close in process 

Data only retrieval 

Loop test bit 

Resume load sequence check 

QISAM does not use buffers——no FREEMAIN is 
required 


ACB, EXLST, IICB length for GETMAIN/FREEMAIN 


ISAM interface status flags used by Open to 
designate the fields being merged by ISAM 
Interface. ISAM Interface Close uses the same 
mask to restore the DCB to its pre~open 
status. 

Relative key position 

Logical record length 

Block size 

Option code 

Record format 

Buffer length 

Buffer number 

Key length 


RPL and RPLE: length for GETMAIN/FREEMAIN 
Length of key save area, in bytes 


Length of single ISAM Interface buffer Cused 
in calculations) 


ISAM interface status flags: 


BFALN merge bit 
Reserved 


Message area length 
Message area pointer 
Number of ISAM interface buffers built by Open 


Total BCB and buffer length for 
GETMAIN/FREEMAIN 


SVC exit for SYNADAF 


Data Areas 389 
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ISAM Interface Control Block (IICB)—Description and Format 


offset 
Dec (Hex) 


52034) 
60C3C) 
60035C) 
64(40) 
68044) 
72048) 
132084) 


132(84) 
132(84) 


133(€85) 


134(86) 
136(88) 
136(88) 


140¢8C) 
140(8C) 


141(8D) 
144090) 


148094) 
148(94) 


149(95) 
152(98) 


156(9C) 
156(9C) 


157(09D) 
160CA0) 
164(A4) 


+ (tae and 
Bit Pattern 
& 
72 
cA 
4 
4 
60 
36 
4 
1 
Dee steht 
Bee tend 
Sea: 2 ae 
Se. ess 
oo KX. 
: oan ee 
cae | 
1 
Tisiec reels 
Py) [ogee 
Peden “Aig Ave 
ghd. A teak 
Paes ere 
sles 
0 o XX 
2 
32 
4 
6 
1 
3 
4 
4 
2 
3 
4 
4 
2 
3 
4 
4 
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Field Name 
IISAMSYN 


IIREGSAV 


ITREGBC 
IITREGFC 


ITAUD 

ITAUDHDR 
ITAUDFL1 
AUDACBOP 
AUDACBRO 
AUDDCBEX 


AUDDCBRT 
AUDPRMOD 


AUDIISYN 
AUDURSYN 


IITAUDFL2 
AUDIIFBF 
AUDACBCL 
AUDACBRC 
AUDBFREX 


AUDBRFRT 
AUDDEBXF 


ITIGMCNTR 
IIGMAUD 


AUDIICB 


AUDCSPLI 
AUDCSPI 


AUDCLI 
AUDCDEB 


AUDCSPLD 
AUDCSPD 


AUDCLD 
AUDCBFRS 


AUDCSPLB 
AUDCSPB 


AUDCLB 
AUDCMSGA 
AUDCSPLM 


Description 


ISAM SYNAD name-—used when SYNAD is specified 
in the AMP parameter 


Register save area 
Reserved 


Previous save area pointer 


Next save area pointer 


Remainder of save area 


Audit information 
Audit flags 
OPEN was issued for ACB 


Control was returned from Open 


A DCB exit was taken 
Control was returned from the DCB exit 


A processing module was loaded: 


tour 
"10° 
vii! 


IDAITIPM1 
IDAIIPM2 
IDAIIPMS 


ISAM~Interface SYNAD routine was loaded 


User SYNAD routine was loaded 


Audit flags 


IDAIIFBF was loaded 
CLOSE was issued for ACB 


Control was returned from Close 


A flush~buffer exit was taken tows 
P 


Control was returned from IDAII 
The DEB extension was freed 


Reserved 


Offset from IIAUD to the next available entry 


in the audit-information fields 


Address 
Address 


Subpool 
Subpool 


Length 
Address 


Subpool 
Subpool 


Length 
Address 


Subpool 
Subpool 


Langth 
Address 
Subpool 


LY26-3 


of virtual-storage areas gotten 
of this IICB 


number 
number 


of the 


number 
number 


of the 


number 
number 


of the 


number 


907-1 


and length 


DEB 
and length 


area for buffers and RPLs 


and length 


physical-error message area 


and length 
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ISAM Interface Control Block (IICE)—Description and Format 


Offset Bytes and ; 

Dec (Hex) Bit Pattern Field Name Description 
1649CA4) 1 AUDCSPM Subpool number 
165(CA5) 3 AUDCLM Length 


IMWA--INDEX MODIFICATION WORK AREA 


The IMWA is a control block used in inserting an index entry 
into the index of a key-sequenced data set. The IMWA is created 
by the Open routine, and is pointed to by the ICWA CICWCHN). 


Index Modification Work Area (IMWA)—Description and Format 


Offset Bytes and 
Dec (Hex ) Bit Pattern Field Name Description 
0¢0) 1 IMWID Control block identifier, X'"42'° 
1¢1) 1 IMWFLAGS Control flags: 
a IMWNEWHL Indicates a new high level should be built in 
the index structure 
Pas ian IMWRIPL Indicates a new entry must be built in an 
index record at the next higher level to 
reflect a new index record created by an index 
split 
Sweat “erected IMWBSE Indicates the new index entry should be a 
section entry 
20 eX XXKX Reserved 
2(2) 2 IMWLEN Length of IMWA in bytes 
404) 4 IMWIXSP Address of index search parameter list 
8(8) 32 IMWISWKA Index search parameter list (see IXSPL) 
40¢28) 4 IMWXKEYP Address of the next Chigher-~keyed) index entry 
40(28) & IMWSECAD Location of selection entry 
44(2C) 4 IMWIKEYP Address of the new index entry's key 
44(02C) 4G IMWRTILMT Right limit of move 
48(30) 4 IMWXPTR Value of the index pointer field in the next 
Chigher-keyed) index entry 
68(30) 4 IMWPTR Saved pointer 
52(€34) 4 IMWIPTR Value to be inserted in new index entry's 
pointer field 
52(34) 4 IMWLFELMT Left limit of move 
56(38) 4 IMWLBUFC Address of a data BUFC for a data buffer 
containing the lowest key following a 
control-area split 
56(38) 2 IMWLOSS Bytes lost from REM 
58(3A) 2 IMWSGAIN Bytes gained from section 
60(3C) 4 IMWBUFP Address of index record being processed 
64040) 1 IMWFGAIN Front key-compression adjustment to be added 
to IBFLPF field in next (Chigher-keyed) index 
entry 
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Index Modification Work Area (IMWA)—Description and Format 


offset 


Dec (Hex) 


64(40) 
65(41) 
65(41) 


66(42) 
66042) 


67(43) 
68044) 


68044) 


70046) 
70646) 


72048) 
72¢048) 


76(¢4C) 


Bytes and 

Bit Pattern 

1 IMWF 

1 IMWIEL 

1 IMWL 

2 IMWGAIN 

i IMWSVIEL 
1 

2 IMWCIMVN 
2 IMWMVLEN 
2 IMWNSOFF 
2 IMWCURLL 
46 

q IMVPRVEN 
Ckey length) IMWKEY1 


IOMB-—I/0-MANAGEMENT BLOCK 


Field Name Description 


CCF) field of current entry 


Value of IBFLPL field-—-that is, compressed 
length of new index entry's key 
CCL) field of current entry 


Bytes gained from removal 
Save area for IBFLPL value 


Reserved 


Readjustment to number of control intervals in 
old control area following a control area 
split to enable an index record to be built 
for the new control area 

Move length 


Offset to next section entry in index record 
Current LL field 


Reserved 
Previous entry 


Highest possible key for a mass 
insertion——that is, last key in a sequence of 
keys to be inserted which is less than an 
existing key; also, save area for current 
insert key under a no-fit condition 


The IOMB is used by I/0 management to control its processing of 
a request. It contains the addresses of other control blocks, 
flags used by I/0 management, and a 16-word register save area. 
The addresses of the first BUFC and CPA are inserted by I/0 
management after it verifies the control blocks. 


The PLH (PLHIOB) and IOSB CIOSUSE) point to the IOMB. The IOMB 
CIOMIOSB) also points to the IOSB, which points to the SRB. 
These three control blocks take the place of the IOB, which is 
used by some other drivers of the I/0 supervisor. 


I/70 Management Block (IOMB)—Description and Format 


offset 


Dec (Hex ) 


0(0) 
404) 
8(8) 
12(C) 
16010) 
20¢14) 
24(18) 


Bytes and 

Bit Pattern 

4G IOMBID 

4 IOMBUFC 
4 IOMCPA 

4 ' IOMPLH 

4 IOMAMB 

4 IOMIQE 

4 TOMECBPT 
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Field Name Description 


Control block identifier: "IOMB' 

Address of the first BUFC 

Address of the first CPA 

Address of the PLH 

Address of the AMB 

Address of the I@E Cinterrupt queue element) 
Address of the ECB 
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I/O Management Block (IOMB)~—Description and Format 


Offset Bytes and 
Dec (Hex ) Bit Pattern Field Name Description 
28(1C) 4 IOMVSL Address of the VSL (virtual subarea list, 
which is the same as the PFL, page fix list) 
32(¢20) 4 IOMPGAD Address of the caller to get control when I/0 
operation is complete (zero for record 
management——used for auxiliary storage 
management) 
36(24) 4 IOMIOSB Address of the IOSB 
40(28) 3 IOMFLAGS Flags: 
40(28) 2 IOMFL Flags reset after I/0 completes: 
Byte 1: 
er IOMAPEND Appendage flags: 
Lee. wei IOMNE Normal end appendage completed 
ee Pee IOMAE Abnormal end appendage completed 
bre. Bees IOMPURGE A purge is in progress 
ieee eaten IOMCBERR A control block wasn't valid 
ee ee ae IOMADERR Virtual addresses in the VPL weren't 
successfully converted to real addresses for 
the IDAL 
ee aeer Sones IOMPGFIX Pages are fixed in real storage 
ee mee ee IOMCSW The address of the channel status word is 
incorrect 
ae ae ee Reserved 
Byte 2: 
Levee Sieece IOMDDR Dynamiec~device reconfiguration 
ede: Hk IOMCPRB Problem state caller 
Se dav ae tice IOMCML Cross~memory lock held 
ee Gee are IOMIUR In UPAD routine 
Brera Liars IOMEEXIT Channel end appendage exited 
ies, eo IOMIRBSW Asynchronous processing scheduled 
eer ae IOMIPFX Invalid PGFX for XM mode 
ee ee ee | IOMUPERR UPAD failed to post ECB 
42(2A) 1 IOMSTIND Status indicators: 
bias, 6G IOMAMUSE The IOMB is in use 
Pp ee eee IOMEOVW End of volume is waiting for an IOMB 
SLs Scecdos IOMEOVTS End of volume has set the IOMLOCK field 
rae: ree IOMEOVXC End of volume indicator 
Brigecee vA ig tee IOMLLOCK A local lock is held 
pes Be IOMSLOC SALLOC is held 
eS) +a Ss IOMSRBM The user is processing with SRB Cevent) 
dispatching 
ee ee ere | IOMSR Suspend/resume indicator 
43(2B) 1 IOMCKEY Key of the caller of I/0 management 
44(2C) 1 IOMPFERR Return code from the PGFIX routine 
45(2D) 1 IOMLOCK End of volume lock 
46C2E) 2 IOMNMOD Number of modules to be fixed in real storage 
48(30) 2 IOMNBUF Number of buffers 
§0¢32) 2 IOMNSEG Number of channel program segments 
§2¢34) 64 IOMSAVER l16-word register save area and work area: 
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I/O Management Block (IOMB)—Description and Format 


Offset 
Dec (Hex ) 


52034) 


116¢74) 
120¢78) 
124(€7C) 
128(80) 
132(84) 


133(85) 
134(86) 
136(88) 
138(8A) 
140(8C) 
144090) 
148094) 
152(98) 


IOMBXN-~-I/0-MANAGEMENT BLOCK EXTENSION 


Bytes and 
Bit Pattern 


64 


Fe SF? HP HH HP HLH 


i.. ee 8 8 
0 o KM KXXX 


a fF Ff DP NH NH NN & 


Field Name Description 


IOMSAVEO 
through 
IOMSAVEF 
IOMSAVEG 
IOMUFLD 
LOMSRBP 
IOMSTCB 
IOMSTIN2 


TOMXMM 
IOMSBIT 


TOMCASID 


IOMPASID: 


IOMSASID 
TOMCASCB 
IOMNXT1 
TOMR14 


See the AMBXN. 


16 four~byte registers save areas 


Additional save area word 

Address of the IOMB extension CIOMBXN) 
Address of suspended request block 
Address of suspended request block's TCh5 
Status indicator—byte 2 

Cross-memory mode 

PSL S-bit CON=SECONDARY mode) 

Reserved 

Reserved 

Current ASID 

Primary ASID 

Secondary ASID 

Current ASCB 

Address of the next IOMB 

Register 14 save area 


Reserved 


IOMBXN2—-—I/0-MANAGEMENT BLOCK EXTENSION 2 
See the AMBXN. 


IOSB-—I/0-SUPERVISOR BLOCK 


394 MVS/XA VSAM Logic 


The IOSB is used by the I/O supervisor to initiate and terminate 


an I/O operation. 


It is passed to the I/O supervisor by VSAM 


I/O management CIDA121A2—the actual block processor), along 


with an SRB 


The IOSB is used to communicate between the I/0 supervisor and 


the requester of I/0, between the I/0 supervisor and an 


error-recovery procedure, between an error-recovery procedure 
and write-to-operator and statistics~-update modules, and among 


the components of the I/0 supervisor. 


It is also used 


to 


control successive entries from the I/0 supervisor to an 


error~recovery procedure. 


The format of the IOSB is given in the Data Areas microfiche. 
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IXSPL~~INDEX SEARCH PARAMETER LIST 


The IXSPL is used to pass index search parameters to the index 
search routine. It also contains status information about the 
results of the search. It is used as a work area by the SCIB 
(search compressed index block) routine (CIDA0D19RC). The PLH 
contains the address of the IXSPL CPLHISPLP) or the contents of 
the IXSPL (CPLHIXSPL). 


Index Search Parameter List (IXSPL)—Description and Format 


Offset 
Dec (Hex ) 


0(0) 
4(4) 
8(8) 
12(C) 


13(D) 


14(E) 
17(11) 


18(12) 


19¢€13) 


20(¢14) 


24(18) 


28(1C) 


Bytes and 
Bit Pattern Field Name Description 


4 IXSSTRBA RBA of the index record to search first. 

4 IXSBUFC Address of the index BUFC 

4 IXSARG Address of the search argument (a key field) 

1 IXSTLN Index level number at which the search is to 
terminate 

1 IXSILN Index level number at which the search is to 
begin 

3 Reserved 

1 IXSBFLG Flags: 

IXSSSRH Used by the search compressed index 

Search routine: 

1. Search for a section entry only 

0.. Search for a normal entry 

: IXSLELV The entry located by the index search routine 
is the last entry in the terminating level (F 
= 0 and L = 0) 

» XX XXXX Reserved 

1 IXSEKON Length of the F, L, and pointer fields in each 
index entry 

1 IXSPEC The number of characters in the index entry 
preceding the entry located by the index 
search routine that equalled the search 
argument 

4 IXSHEP Address of the index entry located by the 
index search routine 

& IXSSEP Address of the section entry that is greater 
than or equal to the index entry located by 
the index search routine 

4 IXSLEP Address of the lowest-valued entry in the 


section identified by IXSSEP 


KEYNDTAB-—-KEYNORD PROCESSING TABLE 


LY26-3907-1 


KEYWDTAB is a branch table that controls the execution of 
IDA019C1 and supports processing for the GENCB, MODCB, SHOWCB, 
and TESTCB macros. The table is built by and contained within 
IDA019C1 and is not referred to by any other module. The table 
contains one 14-byte row for each keyword processed by a control 
block macro, and each row is identified by a keyword type code 
(0-255). Each column in the table represents functions for the 
keywords and contains index points for specific keyword 
functions. Each column also contains either offsets and lengths 
for byte-oriented fields or pointers to descriptive information 
about bit-oriented fields. The index points are used to route 
specific requests through IDA019C1 on the bases of keyword, 


© Copyright IBM Corp. 1974,1985 Data Areas 395 


Restricted Materials of IBM 
Licensed Materials —- Property of IBM 


block (ACB, EXLST, NIB CVTAM), and RPL)», and function (CGENCB, 
MODCB, SHOWCB, and TESTCB). 


Offset Bytes Description J 

0¢0) 14 The description for the keyword with type coda = 0 (KWO00) 

0c0o) 3 The index points for the ACB 

0¢0) 2 The index point for MODCB of the ACB 

101) 1 The index point for SHOWCB of tha ACB 

2(2) 1 The index point for TESTCB of the ACB 

3¢3) 3 The index points for the EXLST 

3¢3) 1 The index point for MODCB of the EXLST 

404) 1 The index point for SHOWCB of the EXLST 

5(5) 1 The index point for TESTCB of the EXLST 

6(6) 3 The index points for the RPL 

6(6) 1 The index point for MODCB of the RPL 

707) 1 The index point for SHOWCB of the RPL 

8(8) 1 The index point for TESTCB of the RPL 

9¢€9) 3 The index points for the NIB CVTAM) 

10CA) 1 The index point for SHOWCB of the NIB 

11¢B) 1 The index point for TESTCB of the NIB 

12(C) 2 The offset to a bit definition if this is a bit-level keyword 2 

13(D) 1 The offset of the resultant field in the target field, if this is = 
a byte field 

14(E) 14 The description for the keyword with type code = 1 CKW01) 

28(1C) 14 The description for the keyword with type code = 2 (KW02) 

3570(CDF2) 14 The description for the keyword with type code = 255 (KW255), the 


maximum value 


LPMB-~LOGICAL-TO-PHYSICAL MAPPING BLOCK 


The LPMB contains information about the direct-access device 
that contains the user's data set. The LPMB is built by the 
VSAM Open routines, which use information in the data sat's 

ee eee uecore: Each EDB entry CEDBLPMBA) contains the address 
of an MB. 


J 
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Logical-to-Physical Mapping Block (LPMB)——Description and Format 


offset 
Dec (Hex ) 


0¢(0) 
1¢1) 


2(2) 
4(4) 


8(8) 
12(C) 
16¢€10) 
18(C12) 
20(¢14) 
22(16) 
24(18) 
25(€19) 


28(1C) 


28(1C) 
28(1C) 


3S0C1E) 
32(20) 


33¢€21) 


LY26-3907-1 


Bytes and 
Bit Pattern 


oa m= NM NY ND ND HLH BH 


VL 


NY NAH 


VL 


Field Name Description 


LPMBID 
LPMBFLGS 
LPMBRPS 


LPMREPL 
LPMSS 


LPMBSSTH 


LPMBLEN 
LPMAUSZ 


LPMBPTRK 
LPMBLKSZ 
LPMTRKAU 
LPMTPC 

LPMBLKTR 
LPMBLKCI 
LPMIDAWN 


Control block identifier, X'91' 

Flags: 

The device has the rotational position sensing 
(RPS) feature 

Records are replicated on thea track 

Sequence set records are stored with the data 
records 

The set sector table is included at the end of 


the LPMB 
Reserved 


Length of the LPMB 

The minimum number of bytes that can be 
allocated to an object. Allocation is always 
an integer multiple of LPMAUSZ. For a data 
set, this field is the control interval size. 
For an index, this field is the device's track 
size. 

Number of bytes per track 

Number of bytes per physical record 

Number of tracks per allocation unit Cextent) 
Number of tracks per cylinder 

Number of physical records per track 

Blocks per CI, Media Manager only 

IDAWs per CI, Media Manager only 


Reserved 


Set Sector Table-—VSAM only 


LPMBSST 


Set sector table, built by Open, used for 
deriving set sector number from the record 
number 


Set Sector Table—Media Manager only 


Set Sector Table—Media Manager only 


LPMBMMST 
LPMBSLT 


LPMBNSLT 
LPMBSSTO 


LPMBSST1 
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Media Manager: sector table 
Sector lead time 


Sector lead time minus sectors per track 

Set sector table RO base. 

Note: Sectors for records 0 through ntl, where 
there are n records per track 


Set sector table 
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It is 


built by IDA0192A, mapped by IDAOPWRK, and pointed to by 
register 4 during VSAM processing. 


OPEN Work Area (OPW)——Description and Format 


offset 
Dec (Hex) 


0¢0) 
1¢1) 
4(4) 
12(C) 


13(D) 


14(E) 


15(¢F) 


16¢€10) 
20(14) 


24018) 
24(18) 


28(1C) 
31C01F) 
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Bytes and 
Bit Pattern 


1 


Field Name Description 


OPWSUBPL 
OPWLENTH 
OPWID 

OPWFLGSI 


OPWCAT 
OPWSCRA 
OPWVVIC 
OPWSDS 


OPWFLGS2 


OPWUCRA 
OPWIXDT 
OPWAIXDT 
OPWDUMMY 
OPWICF 
OPWCATX 
OPWVVDS 
OPWCATDS 


OPWFLGS3 


OPWDAVAT 
OPWPUPGR 
OPWUPGOP 
OPWNOWRK 
OPWRSTRT 
OPWVERFY 
OPWCBUF 

OPWSYSTM 


OPWFLGS4 
OPWFULL 
OPWCINV 
OPWUPD 
OPWBIB 
OPWCOMWA 


OPWIDF 
OPWCACB 


OPWDCI 
OPWQ 


OPWDDC 
OPWGSR 
OPWLSR 
OPWFSTP 
OPWUBF 


Subpool of work area 


Work area length 
Block ID-—-IDAOPWRK 
Flag byte 1: 


Catalog open 
System CRA open 
MSVI data set 
System data set 


Reserved 


Flag byte 2: 


User CRA open 

Index open as an ESDS 

Alternate index open for end use 
Open dummy data set 

Object cataloged in ICF catalog 
CATX option selected 

VSAM volume data set 

Opened as catalog data set 


Flags for IDA0192F 


Dummy AMBL added to VAT 

Path also in upgrade set 
Upgrade set open 

MOD work area does not exist 
Restart in progress 

Verify failed indicator 

CBUF processing 

System indicator 


Authorization flags: 


Full access 


Control-interval access 
Update access 


Reserved 


Address of the BIB 


Address 


Cluster 
Address 


Control 


of Open common work area 


identifier 
of catalog ACB 


Open qualifier: 


Connect by 
Opened for 
Opened for 
Opened for 
Opened for 


LY26-3907-1 


DD name 

GSR 

LSR 

ICI 

user buffering 
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OPEN Work Area (OPW)—Description and Format 


offset 
Dec(Hex ) 


32(20) 


7604C) 
76(04C) 


80(50) 


OPEN Work Area (COPW)—Description and 


offset 
Dec (Hex) 


81051) 
84(054) 


88058) 
89(59) 


90¢5A) 
92(5C) 
9205C) 
96(60) 


100(€64) 
104(68) 
108¢(6C) 
112¢€70) 
116¢€74) 
132684) 


0¢0) 
0¢0) 


LY26-3907-1 


Byers and 
Bit Pattern 


jL.%-% 
ive oe 
1 
44 


16 


Bytes and 
Bit Pattern 


3 
4 


Field Name 


OPWKSDS 
OPWESDS 
OPWDFR 

OPWDDSN 


OPWVSMPL 
OPWVMANC 


OPWVMSP 


Field Name 


OPWVMLNG 
OPWVMADR 


OPWVMTYP 
OPWVMFLG 
OPWVMPGB 
OPWVMKES5 
OPWVMDXK 
OPWVMSRB 
OPWVMNSL 


OPWVMTCB 
OPWVMANY 


OPWVSMWA 
OPWVANCP 


OPWVTBLP 


OPWVCSLP 
OPWVCSLE 
OPWVHDRE 
OPWVR13 
OPWSAVE 


OPWVGSPL 
OPWVGSSP 


© Copyright IBM Corp. 
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Description 

Opened as a KSDS 

Opened as an ESDS 

Opened with deferred write option 
Data component data set name 


O/C/EOV virtual storage manager parameter list 
Address of anchor block 


Subpool for direct request 


Format 


Description 
Amount of storage requested 


Address of storage acquired (zero, if storage 
not obtained) 


Request type 

Flag byte: 

Get storage on a page boundary 

Get storage in Key 5 

Get storage in Key 7 Cif not key 5 or key 7, 
get storage in key 0 or problem program key) 
Special request block 

Do not build a CSL for this request 

Storage is owned by JOBSTEP TCB 

GETMAIN LOC=ANY 

Reserved 

Reserved 

O/C/EOV virtual storage manager work area 
Pointer to the address of the first HEB header 
element associated with this request 


Address of the request table used by GETSPACE 
routine 


Used to scan for a CSL entry 
Address of save list entry 
Address of header element 
Address of caller's save area 
IDA0192M save area 


The following 12-byte field is repeated three 
times: 


GET SPACE parameter list 


Subpool number 
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OPEN Work Area (OPW)—Description and Format 


Offset 
Dec (Hex) 


101) 
4(4) 
8(8) 


909) 

168(A8) 
172CAC) 
172CAC) 
176( BO) 


180(B4) 
180(B4) 


181(B5) 
184(B8) 


188 (BC) 
188(BC) 


192(C0) 
196(C4) 
200¢C8) 
204(CC) 
208(D0) 


212(D4) 
216(D8) 


220¢(DC) 
224(E0) 
228CE4) 
232(E8) 
236CEC) 
2420F2) 


400 MVS/XA VSAM Logic 


Bytes and 
Bit Pattern 


3 
4 
1 


ms) 


- fF fF FP HP BN HF WwW KO HL HO 


FP FP oO SP FEF HR IFO CDF 


= eo 
e 
e 


e 6° 
e e 
> -_ 
we 
e 


Field Name Description 


OPWVGETL 
OPWVGSPT 
OPWVGFLG 


OPWVREQL 
OPWVANCS 
OPWVLSAV 
OPWVRG12 
OPWVRG13 


OPWVFMPL 
OPWVFMSP 


OPWVFMLN 
OPWVFMPT 


OPWSAVE 
OPWCSL 


OPWESL 
OPWPSL 
OPWDSL 
OPWSSL 
OPWCURPT 


OPWXAMBL 
OPWCAMBL 


OPWBCON 
OPWPCON 
OPWBAMBL 
OPWPAMBL 
OPWCRA 
OPWR2 


OPWBIC 
OPWVSIBD 


OPWSHARE 
OPWCREAT 


Length of acquired storage 
Address of acquired storage 


Flags for GET SPACE (see OPWYVMFLG, above, for 
description of bit settings) 


Langth of request 


Address of BIB anchor for sphere block 
requests 


SETLOCK save area 
Save area for register 12 


Save area for register 13 


FREEMAIN parameter list 
FREEMAIN subpool number 


FREEMAIN length 
FREEMAIN address 


Addresses of save lists 
Address of core save list 


Address of EN@ save list 
Address of page-fix save list 
Address of DEB save list 
Address of swap save list 


Address of cluster being processed. This 
field can point to OPWBSECL (528¢210)), 
OPWPTAIX (536(218)), OPWUPAIX (€548(224)), and 
every 8 bytes thereafter, since OPWUPAIX is a 
repeating field. The format of current 
cluster information is described below by 
OPWCURCL. 


Address of current AMBL 


The address of the existing AMBL for 
connecting to an existing structure 


Address of base AMBL for connect 

Address of path AMBL for connect 

Address of AMBL for base 

Address of AMBL for path 

CRA volume serial number 

Qualifier flag field 

CBIC bit 

VSIs have been newly built by this open and 
used by open error cleanup 


Share option (3,3) or (4,3) 
Create mode 
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OPEN Work Area (OPW)—Description and Format 


offset Bytes and 
Dec (Hex) Bit Pattern Field Name Description 
s ee OPWNOPFL PFL does not exist 
ee ees oe OPWMMS Media manager 
ie ee ON Reserved 
2430F3) 1 OPWCATTR Cluster attributes: 
XXXX XK. . Must not be used 
eb wis a OPWSWSP Swap space 
; bok OPWPSDS Page space data set 
244(CF4) 4 OPWUPT Address of upgrade table 
248CF8) 4 OPWUACB Address of user ACB 
252(FC) 4 OPWWRKPT Address of current AMB work area 
256¢€100) & OPWDTWRK Address of data AMB work area 
2600104) 4 OPWIXWRK Address of index AMB work area 
262¢108) 4 OPWCTCB Address of current TCB 
268(10C) 4 OPWJSTCB: Address of JOBSTEP TCB 
272¢(110) 4 OPWTIOT Address of TIOT entry 
2760114) 4 OPWSREC Address of sphere record 
280(118) 4 OPWBUFND Number of data buffers 
284(11C) 4G OPWBUFNI Number of index buffers 
288(120) 1 OPWCSTRN Current string number 
289¢€121) 1 OPWSTRNO Path string number, if path processing; 
otherwise, base string number 
290¢€122) 1 OPWBSTRN Base string number, if base processing 
291¢123) 1 OPWCATLN Catalog name length 
292(124) 52 OPWDACB Dummy ACB for opening base 
344(6158) 12 OPWSFI Subfunction information 
3560164) 256 OPWERMAP Map of return codes to ACBERFLG, where return 
code re is defined in the System Messages 
manual for messages IECO70I, IECI611I, IEC251iI, 
and IEC252I. 
612(264) 4 OPWSAVEA Return address save area 
6166268) 8 OPWBSECL Base cluster information 
616(268) 1 Reserved 
6176269) 3 OPWBDTCI Base data control interval number 
620026C) 1 OPWBDSNL Base data set name length 
621¢26D) 44 OPWBDDSN Base data set name 
6650299) 1 Reserved for flags 
669(29D) 3 OPWBIXCI Base index control tnterval number 
LY26-3907-1 © Copyright IBM Corp. 1974,1985 Data Areas 401 





Restricted Materials of IBM 
Licensed Materials — Property of IBM 


OPEN Work Area (OPN)-——Description and Format 


Offset 
Dec(Hex) 


672(02A0) 
673(2A1) 


720(02D0) 
720(2D0) 


721(2D1) 


724(02D4) 
725(2D5) 
7690301) 
7730305) 
7760308) 
7770309) 
8210335) 
8250339) 
828(335C) 
8320340) 


6330341) 


Bytes and 
Bit Pattern 


1 


44 
101 


= = HP Ww & 


3 


xx KKK 


Field Name Description 


OPWBIDSL 
OPWBIDSN 
OPWPTAIX 


OPWPDTCI 


OPWPDSNL 
OPWPDDSN 


OPWPIXCI 
OPWPIDSL 
OPWPIDSN 
OPWNOUPG 
OPW2YPLH 
OPWCUPGR 
OPWFLAGS 
OPWCMBOT 


Base index data set name length 
Base index data set name 


Path alternate index information 
Reserved for flags 


Path alternate index data control intarval 
number 


Path data data set name length 

Path data data set name 

Reserved for flags 

Path alternate index control interval number 
Path index data set name length 

Path index data set name 

Number of upgrade alternate indexes 

Address of PLHNXT for IDA0192Y and IDA0192Z 
Base for OPWUPAIX 

Miscellaneous flags 


CMBOUT was turned on by this open request 
Reserved 


Reserved 


The format of information about each upgrade alternate index associated with the 
base cluster being processed (pointed to by OPWCURPT) is shown below: 


0¢0) 
0¢0) 
1¢1) 


4(04) 
5(5) 
49(31) 
53(35) 


56(38) 
57039) 


101 


44 


OPWUPAIX 


OPWUDTCI 


OPWUDSNL 


OPWUDDSN 


OPWUIXCI 


OPWUIDSL 
OPWUIDSN 


Upgrade alternate index information 
Reserved for flags 


Upgrade alternate index data control interval 
number 


Upgrade data data set name length 
Upgrade data data set name 
Reserved for flags 


Upgrade alternate-index index control interval 
number 


Upgrade index data set name length 


Upgrade index data set name 


The format of information about the cluster being processed (pointed to by OPWCURPT 
is shown below: 
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0¢0) 101 
0¢0) 1 
Lene eves 
pe cae 
sede. Se ae 
edt. Beats 
ewe. Deas 
XXX 
1(¢1) 3 
4(4) 1 
5(5) 44 
5(5) 22 
27(01B) 22 
49°31) 1 
Dis tea eters 
sDeccur. sepiepe 
Rare ere a 
ee eee 
oe Les 
o KKK 
53(35) 3 
56(38) 1 
57039) 44 
57039) 22 
79C4F) 22 
PLH-~PLACEHOLDER 


OPWCURCL 
OPWCFLG1 
OPWBASE 
OPWPATH 
OPWUPGR 
OPWSVWRK 
OPWPRTBL 
OPWCDCTI 
OPWCDSNL 


OPWCDDSN 
OPWCDD1L 


OPWCDD2 

OPWFLG2 

OPWDOPEN 
OPWMODWK 
OPWEMPUP 
OPWERR2B 
OPWIOPEN 
OPWCIXCI 
OPWCIDSL 


OPWCIDSN 
OPWCID1 


OPWCID2 


Current cluster information 

Cluster flags (set by sphere Open): 
Open base cluster 

Open path alternate index 

Open upgrade alternate itndex 

Do not free AMB work areas 

Partial control-block build 

Reserved 

Data component control interval number 
Cluster data set name length 


Cluster data data set name 
First half of cluster data data set name 


Second half of cluster data data set name 
Cluster flags (set by cluster Opan) 

Open indicator on in catalog for data 
Module work area exists 

Empty upgrade data set 

Terminating error in IDA0192B 

Open indicator on in catalog for index 
Reserved 

Index component control interval number 
Cluster index data set name length 


Cluster index data set name 
First half of cluster index data set name 


Second half of cluster index data set name 


The PLH contains current information about a string of requests. 
This tnformation includes positioning information, raquest 


options, and buffer location and status. 
the Open routine and is pointed to by the AMB CAMBPH). 
PLH in the chain ts pointed to by PLHCHAIN. 
entries is the number given in STRNO in the ACB. 
the number is the number in the first ACB opened 


set is shared, 


for the data set.) 
processing a PLH, 


The PLH is built by 
The next 
The number of PLH 
(When a data 


When a record-management routine is 
the PLH's address is in register 2 CRPLH). 


Placeholder (PLH)-——Description and Format 


Offset 
Dec (Hex ) 


00) 
1(1) 
2(2) 
404) 
8(8) 


Bytes and 
Bit Pattern 


Nn FF NO FF FE 


Field Name 


PLHID 
PLHCNT 
PLHELTH 
PLHDRREQ 
PLHDRMAX 
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Description 

Control block ID = X‘'30' 

Number of PLH entries that follow the header 
Length of each PLH entry 

Count of requests that have been deferred 


Maximum number of placeholders (PLH entries) 
in concurrent use 
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Placeholder (PLH)—Description and Format 


offset eyees and 
Dec (Hex ) Bit Pattern 
10CA) 2 
12¢C) 4 
PLH Entry 
0¢0) 1 
1¢1) 1 
De se. tapes 
elas. ‘ease 
ecg Lee - caress 
oe eK KKXXX 
2(2) 1 
Dc teet Stash 
gh Se. caters 
Serbs: Uew-ate 
ake. Lecereks 
ee ere 
me Ue 
oper lee 
eek 
3(€3) 1 
1 a ere a 
Gok ee eee 
Seckue bevececs 
ey: eer es 
ee Seen 
bck eos 
ee 
Seek 
4(4) 2 
ae : 
oe ieee 
Shay wecsaxs 
ped. -g Shes 
eel. kets 
s sate 
e ae lee 
Para t 
1 errr ae 
~—XKXM KKXX 
6(6) 1 
1. ots 
silone. esses 
Sebi, Chee 
cae Meee 
bee es 
e an eae 


404 MVS/XA VSAM Logic 


Field Name Description J 
PLHDRCUR Number of active placeholders 
PLHIOSDQ Data~set management (I/0 support) deferral 
queue header 
PLHAVL Zero if the PLH entry is available 
PLHFLGO Process flags—byte 0 
PLHSUPR Caller in supervisor state 
PLHXMM Cross-~memory mode caller 
PLHSRBM On, if SRB mode 
Reserved 
PLHFLG1 Process flags, byte 1: 
PLHEOVW The VSAM End of Volume routine is waiting 
PLHENDRQ The caller issued an ENDREQ request 
PLHASKBF Less than maximum buffers 
PLHSSR The sequence set is stored with the data 
PLHRDEXC Read exclusive mode 
PLHASYR@ IRB execution needed 
PLHDRPND A deferred request is pending 
PLHSR Suspend/resume processing instead of WAIT/POST 
PLHPFLG2 Process flags, byte 2: 
PLHUPD The previous request was a GET~for-update 
PLHSQINS Sequential insertion mode 
PLHKEYMD Keyed mode j 
PLHADDTE Add to the end processing 
PLHKRE End of key range indicator 
PLHCIINS Control interval split insertion 
PLHSVADV Save the PLHNOADV field during Scan Data 
PLHIWAIT IDAWAIT indicator - that a synchronous test is 
in progress 
PLHEFLGS Exception flags: 
Byte 1: 
PLHNOSPC No space found—create mode 
PLH1IST This is the first request after the data set 
was opened 
PLHSKPER Skip across the error control interval 
PLHSRINV Spanned record is invalid 
PLHNOADV Don't advance the PLH 
PLHEODX The EODAD exit was taken 
PLHINVAL Not positioned in a buffer 
PLHDSCAN Scan data after read exclusive 
e : 
PLHRSTRT Restart 
Reserved 
PLHFLG3 Flags: 
PLHSRBSG Update numbers in RDFs of spanned-record 
segments aren't the same 
PLHRAHD Do read-ahead buffering 
PLHSLVLD Second level of the index is valid 
PLHBWD Previous request specified backward processing 
PLHRVRS The I/0 chain is reversed 
PLHEOVDF EQV defer on IRB flag ) 
LY26~-3907-1 © Copyright IBM Corp. 1974,1985 


C 


Restricted Materials of IBM 
Licensed Materials — Property of IBM 


Placeholder (PLH)——Description and Format 


offset 
Dec (Hex ) 


707) 


8(8) 
12¢C) 


13(D) 

14(E) 

15(F) 

16(10) 
20(14) 
24(18) 
28010) 
28010) 
28(1C) 
32(¢20) 
32(¢20) 
36024) 
40(28) 


40°28) 
40(28) 


LY26-3907-1 


ayes and 
Bit Pattern 


X'o1t 
X'02' 


ee FSF SP HP LHP LP HP LHL F 


X'00' 
X'04! 
X'08' 
xtoc' 
X'10' 
X'14!' 
X'20' 
X'24!' 
X'28!' 
X'2C! 
X'30!' 


X134! 
X38! 


Field Name Description 
Reserved 
PLHAFLGS Flags: 
PLHDRLM A direct request was issued during loading of 
an empty data set 
PLHIOSRQ I/O support request 
PLHVAMB The AMB that points to the PLH is valid 
PLHDBDC The PLH is from the VSAM resource pool 
PLHIOSID I/0-support ID 
PLHRABWD IDAOD19SRA was entered for backward processing 
PLHRAE IDAOD1LORA key equal found bit 
PLHSEQ Get sequential request 
The next two fields comprise the DSID 
Cdata-set identification): 
PLHACB Address of the caller's ACB 
PLHDSTYP Data set type: 
Data 
Index 
PLHRMIN Read threshold 
PLHFRCNT Number of free buffers 
PLHBFRNO Total number of buffers 
PLHMRPL Address of the RPL header 
PLHCRPL Address of the current RPL 
PLHDSIDA Address of the DSID (PLHACB field above) 
PLHCRBA Current RBA 
PLHJORBA Old RBA——to support the JRNAD exit routine 
PLHUPECB UPAD A CECB) 
PLHJRNLL Length of the data-——to support the JRNAD exit 
routine 
PLHCNCL1 JRNAD cancel field 
PLHJNRBA New RBA——to support the JRNAD exit routine 
PLHJCODE Entry code——to support the JRNAD exit routine 
PLHUCODE UPAD exit code 
PLHJCODE JRNAD exit reasons: 
JRNAD entry for GET 
JRNAD entry for PUT 
JRNAD entry for ERASE 
JRNAD entry for RBA change 
JRNAD entry for spanned record read 
JRNAD entry for spanned record write 
JRNAD entry for control-area split 
JRNAD entry for I/0 READ error 
JRNAD entry for I/O WRITE error 
JRNAD entry for index modification 
JRNAD entry for exclusive use of control 
interval 
JRNAD entry for shared use of control interval 
JRNAD entry for exclusive use of control 
interval 
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Placeholder (PLH)——Description and Format 


offset 
Dec (Hex) 


40(28) 


41(29) 
G2(2A) 


43(2B) 


44(2C) 
48030) 


52034) 
56038) 
60¢3C) 
64040) 


68044) 
72(48) 
74(4A) 


76(4C) 
76040) 


80(50) 


84054) 


108(6C) 
112¢70) 


406 MVS/XA VSAM Logic 


Bytes and 
Bit Pattern 


X'3C! 


X'40' 
X'44! 
X'48! 
X"4C! 


ao fF fF = 


£ PH MO NN 


4 
4 


Field Name Description J 


PLHUCODE 


PLHRCODE 
PLHEOVR 


PLHRSCS 


PLHINEOV 
PLHBUFHD 
PLHASYER 
PLHDSERR 


PLHDBPER 


PLHARDB 
PLHLRECL 


PLHDBUFC 
PLHNBUFC 
PLHRECP 
PLHFSP 


PLHRDFP 
PLHRDFC 
PLHSRSID 


PLHDIOB 
PLHIIOB 


PLHARET 
PLHSAVE1 
through 
PLHSAVE6 
PLHAMB 


PLHCHAIN 


JRNAD entry for building a new control 
interval 

JRNAD entry for release of exclusive use 
JRNAD entry for control interval invalidation 
JRNAD entry for READ completion 

JRNAD entry for WRITE completion 


UPAD exit reasons: 


UPAD entry for WAIT 
UPAD entry for POST 


Indicates the previous request type 


End-of-Volume request code~indicates space 
allocation or volume mount 


Resource bits and feedback code indicators for 
TERMRPL 


EOV in process 

PLH locked BUFC header 

ASYNC deferred request cannot be restarted 
Possible data set error caused by: 

1. Incomplete I/O operation 

2. BUFC has a must-write data-condition 
Error in PLH data BUFC pointer 

Reserved 

Address of the current data ARDB 


Length of the record processed during the } 
previous request 


Address of the current data BUFC 
Address of the next read BUFC 
Address of the current record 


Address of the first byte of free space within 
the record 


Address of the current RDF 
Replication count for the current RDF 
Spanned-record segment ID 


Address of the data IOMB 
Address of the index IOMB 


Return address to the I/O manager's 
asynchronous routine 


Six 4-byte register save areas~not to be used 
by buffer management, I/0 management, IDADR@, 
or IDATJXIT 

AMB-address save area for IDADR@ and IDATJXIT 


Address of the next PLH in the chain 
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Placeholder (PLH)—Description and Format 


Offset Bytes and 
Dec (Hex) Bit Pattern Field Name Description 


116¢74) 2 PLHRETO Offset to the currant register 14 save area in 
the push-down list (CPLHRETL) 

118(76) 2 PLHRETOS Initial offset 

120(78) 56 PLHRET1 Save area (push-down list) for 11 return 
registers (register 14) 

164CA4) 4 PLHASAVE Beginning of save area for I/0 management's 
asynchronous routine 

168CA8) G PLHRST14 Save area for asynchronous return register 

172CAC) G Save area for 14th return register 

176(B0) G PLHAR14 Address to which the asynchronous routine is 


to return 


180(B4) G PLHEOVPT Address of tha RBA provided by the 
end-of-volume routine 

180(B4) 4 PLHDDDD RBA of the previous request 

184(B8) 4G PLHNRBA Next RBA 

188¢( BC) 4 PLHIBUFC Address of the index BUFC 

192(C0) 4 PLHRBUFC RBUFC save area for IDADRQ and IDATJXIT 

196 (C4) 4 PLHISPLP Address of the IXSPL 

200¢C8) 32 PLHIXSPL Space for one IXSPL 

200¢C8) 4G PLHSSRBA RBA of the sequence-set control interval 

200(C8) 6 PLHHIREC RBA of the high record 

204(CC) & PLHIXBFC Address of a BUFC for index 

208(D0) 24 Parameter area for index search 

232(0E8) 4 PLHWAX Address of the work area for path processing 

232(E8) 4 PLHXPLH Address of the PLH for the alternate index of 
the base cluster 

232(E8) 6 PLHMSSER Error information save area for 
CNVTAD/MNTACQ/ACQRANGE request 

236(EC) 4 PLHLLOR Address of the least length of the data record 
that contains all the record's key fields 

240CFO0) 2 PLHNOSEG Number of segments in a spanned record 

242(F2) 2 PLHSRCSG Number of the segment being processed 

2440 F4) 4G PLHSLRBA RBA of the second level of tha index 

248(F8) 4G PLHKEYPT Address of the current key (PLHKEY at end of 
PLH entry) 

PLHRRN Previous relative record number 

252CFC) 4 PLHDRRSC Address of the deferred-request flag byte 

256(100) 4 PLHPARM1 RPARM1 save area for IDADR@ and IDATJXIT 

260(104) G PLHR13 Register 13 save area for IDADR@ and I/0: 


management 
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Placeholder (PLH)-—Description and Format 


Offset 
Dec (Hex) 
264(108) 


265(109) 


266(010A) 
268(10C) 


272(110) 


276(114) 


2800118) 
2800118) 
2806118) 
284(11C) 


285(11D) 


286(11E) 
288(120) 


VL 


He and 


t Pattern 


408 MVS/XA VSAM Logic 


Field Name Description 


PLHDRMSK 


PLHTMRPL 
PLHTERM 

PLHTMBUF 
PLHTMDIW 
PLHTMDTA 
PLHTMINX 
PLHTMIOB 
PLHOPTCD 


PLHECB 


PLHASCB 


PLHERRET 


PLHEND 
PLHEXTEN 
PLHRESR1 
PLHBFLGO 
PLHIBFRS 
PLHUCSHR 
PLHUCMOD 
PLHBMWRK 
PLHBMRDF 
PLHBEUC 
PLHBMSOV 
PLHINVF 
PLHBEXCF 
PLHBRBAF 
PLHBMWF 
PLHDEXCL 
PLHRDCNT 
PLHBMSV1 
through 
PLHBMSV5 
PLHKEY 


PLHRRN 


Mask to test for resources for a deferred 
raquest 


TERMRPL process bits: 


TERMRPL is process 
TERMRPL freed BUFC header 
TERMRPL freed DIWA 
TERMRPL freed data BUFC 
TERMRPL freed index BUFC 
TERMRPL freed IOMB 
Reserved 


RPL option bytes 1 and 2 save area (ACQRANGE) 


Address of event control block for 
cross-region post 


Address of address space control block for 
cross-region post 


Address to which to return from an error (for 
cross-region post) 


Label for the end of the PLH entry before 
PLHEXTEN and PLHKEY 

Extension to the PLH for processing with 
shared resources (Coptional): 

Address of a serial resource being held 


Buffer manager flags: 


Indeterminate buffer status 
PLH sharing use chain 

PLH modifying use chain 
Reserved 


Buffer-management work flags: 


The RBA was found in the buffer pool (for 
SCHBFR macro) 

End of use chain 

Start-over flag 

ON-buffer invalidated 

ON-buffer under exclusive control 

ON-RBA found and processed 

ON-buffer found modi fied 

Defer setting BUFCEXC 


Save area for AMBRDCNT 


Five 4-byte save areas for buffer management 


The current key, pointed to by PLHKEYPT 


Previous relative record number 
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PSL“"PAGE SAVE LIST 


Open. 


The PSL contains a variable number of entries that describe the 
pages of virtual storage that have been fixed in real storage by 
It anables Open to free these pages if an error prevents 


them from being freed normally. 


The PSL is pointed to by OPWA (called the ACB work area). 


There 


is no more than one PSL per data set. 


Page Save List (PSL)—Description and Format 


offset Bytes and 
Dec (Hex) Bit Pattern Field Name 
0(0) 1 PSLSUBPL 
1(¢1) 3 PSLLENTH 
404) 8 PSLID 
12¢C) 4 PSLNXPTR 
16¢10) 8 xn PSLENTRY 
16¢10) 4 PSLSTAD 
20614) 1 PSLFLG 
Diece- ee: et ret PSLFLGLT 
KKK KXKX 
21¢15) 3 PSLENDAD 


RPL~“"REQUEST PARAMETER LIST 


Description 

Subpool number of the PSL 

Length of the PSL 

Identifier: ‘IDAPSL' 

Zero 

Rodrast $F" RaPStetiates or th 
virtual-storage area that was fixed 
Flags: 


This is the last entry 
Reserved 


Address of the first byte bayond the 
virtual-storage area that was fixed 


The RPL contains user-request information and error feedback 


information. 
PUT macros. 


It also contains information required by GET and 


The RPL is created by the user with the RPL or the GENCB macro. 


The RPL may reside above 16 megabytes if the caller's addressing 


mode (CAMODE) 


is 31. 


Request Parameter List (RPL)—Description and Format 


Offset Bytes and 
Dec (Hex) Bit Pattern Field Name Description 
0(0) 4 RPLIDWD Identification word of the RPL: 
0(¢0) 1 RPLID Control block identifier, X'00' 
1¢1) 1 RPLSTYP RPL subtype: 
X'10" = VSAM 
X'20" = VTAM 
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Request Parameter List (RPL)—Description and Format 


Offset 


Bytes and 
Dec (Hex) 


Bit Pattern 


2(2) 1 RPLREQ 


RPLLEN 
RPLLEN2 


RPLPLHPT 
RPLECB 


3(3) 
3¢3) 


4(4) 
8(3) 


a Sf PR 


Tie Seah, ere RPLWAIT 
RPLPOST 


909) 3 


RPLFDBWD 
RPLSTAT 
RPLFUNCD 


RPLFDBK 


RPLRTNCD 
RPLERREG 


12(C) 4 
12(C) 1 
12(C) 1 
13¢D) 3 
13(D) 1 


RPLCNDCD 
RPLCMPON 


RPLERRCD 


RPLKEYLE 
RPLKEYL 


14(E) 2 
14(CE) 


1 
15(¢F) 1 
16¢€10) 2 


410 MVS/XA VSAM Logic 


Field Name Description } 


Request type—when the user issues a VSAM 
macro, register 0 contains one of the 
following request-type codes; when VSAM 
processes the request, the request-type code 
in register 0 is transferred to the RPLREQ 
field Cunless the request is CHECK or ENDREQ) 


GET request 

PUT request 

CHECK request 

POINT request 

ENDREQ request 

ERASE request 

VERIFY request 

Data preformat request 
Index preformat request 
Force I/0 request 
GETIX request 

PUTIX request 

SCHBFR request 

MRKBFR request 

WRTIBFR request 

CNVTAD request 

MNTACQ request 
ACQRANGE request 
TERMRPL request 


RRM RRR RRP OOAURWNE © 


WOOnXNWUIP WGN OKRA RA RRR A 
FR PRP PR FR PR PR PR PR PRO A UTD GIR = © 


RPRRPE TMOOWPwywyuuwuuuuvy 
ANH Ow wwuwuwwy 


we et We 


Length of the RPL 
Length of this block 


Address of the PLH F 


Address of the external ECB, or an internal 
ECB: 


The event has not yet completed 
The event has completed 
Reserved 


Reserved, if RPLECB is an internal ECB, or the 
address of the external ECB 


Feedback word: 
Current RPL status 
Problem determination function code 


RPL feedback area (See "Diagnostic Aids" for a 
list of RPL return codes and condition codes. ) 
RPL return code 

Normal return 

Invalid control block 

Logical error 

Physical error 


RPL condition code 
Component issuing the code 


Error code 


Key length 


J 
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Request Parameter List (RPL)—Description and Format 
( Offset Bytes and 
Dec (Hex) 


Bit Pattern Field Name Description 


18(€12) 2 RPLSTRID RPL string identifier 
20614) G RPLCCHAR Address of the control character 
24(18) 4 RPLDACB Address of the caller's ACB 
28(10) 4 RPLTCBPT Address of the user's TCB-—this field is 
always zero for a VSAM RPL 
32(20) 4 RPLAREA Address of the caller's record area 
36024) 4 RPLARG Address of the caller's search argument 
40(28) 4 RPLOPTCD Option flags 
40(28) 1 RPLOPT1 Option flag byte 1: 
: ee RPLLOC Locate mode 
Oe 5% Move mode 
oe ie - RPLDIR Direct-search access 
ik RPLSEQ Sequential access 
a RPLSKP Skip sequential processing 
1. RPLASY Asynchronous request 
0.. Synchronous request 
: RPLKGE Search key greater than or equal 
Search key equal 
RPLGEN Generic key 
Full key 
RPLECBSW 1 = the ECB pointed to by RPLECB is external 
0 = the ECB pointed to by RPLECB is internal 
RPLECBIN Same as RPLECBSW 
41°29) 1 RPLOPT2 Option flag byte 2: 
1. RPLKEY Locate the record identified by a key 
; RPLADR Locate the record at the caller~-speci fied 
RPLADD relative byte address (RBA) 
RPLCNV Locate the control interval at the 
caller-specified RBA 
a RPLBWD Process in backward direction 
Lz RPLLRD sees or retrieve the last record in the data 
se 
RPLWAITX Synchronous processing wait exit 
RPLUPD Update processing 
RPLNSP Note the string position 
42(02A) 1 RPLOPT3 Option byte 3: 
Ll; RPLEODS End of user SYSOUT 
. RPLSFORM Special form on remote printer 
RPLBLK Block = 1, unblocked = 0 fixed block 
processing X04SVhS 
os RPLVFY UCS/FCB VERIFY = 1 
1 ore RPLFLD UCS FOLD = 1 
, RPLFEMT Format type: 
0 = UCS load 
01 = FCB load 
10 = 3800 printer 
11 = Reserved 
RPLALIGN 0 = Do not align FCB buffer loads 
1 = Align buffer and notify operator 
43(2B) 1 RPLOPT4 Option byte 4: 
oe RPLENDTR 3800 end of transmission 
: RPLMKFRM 3800 mark form 
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Request Parameter List (RPL)—Description and Format 


offset 
Dec (Hex) 


44(2C) 


48(30) 
52(34) 
56(38) 


60¢3C) 
60(3C) 


62¢03E) 


63(3F) 
64(40) 
68 (44) 
69045) 
70046) 
72048) 


RPLE--REQUEST PARAMETER LIST EXTENSION 


Offset 
Dec (Hex) 


0¢0) 
4(4) 


8(8) 


12(C) 


412 MVS/XA VSAM Logic 


Bi 


ware ie eevee 
00 eX XXX 


= NO FF LH LH 


x 


KKK KKK 


fF HH —- SP LE 


Bit Pattern 


4 
4 


46 


tes and 
t Pattern 


Field Nama Description 


RPLNOCIR 
RPLNXTRP 
RPLCHAIN 
RPLRLEN 
RPLBUFL 
RPLOPTC2 


RPLRBAR 
RPLAIXPC 


RPLAIXID 
RPLAXPKP 


RPLENDR@ 
RPLDDDD 

RPLEXTDS 
RPLACTIV 
RPLEMLEN 
RPLERMSA 


J 


No CI reclaim 
Reserved 


Address of the next RPL in the chain 


Langth of the record 
Length of the user's buffer 
VTAM options 


RBA return location 
Alternate~index pointer count 


Alternate-index pointer type: 


Pointer is: 


1 Prime-key pointer 
0 RBA pointer 
Reserved 


ENDREQ active indicator 
Relative byte address 
Exit definitions (VTAM) 
CHECK not issued 

Error message length 


Address of the error message area 


An RPLE is built and appended to each ISAM interface RPL when 


the user's ISAM program opens a VSAM cluster. 


The RPLE contains 


the address of the IICB, a register save area, a linkage to 
Nt in the ISAM interface RPL pool, and a pointer to the 


Request Parameter List Extension (RPLE)~—Description and Format 


tes and 


Field Name Description 


RPLIICB 
RPLDECB 


RPLIIBFR 


RPLRPLPT 


Address of the IICB 


Address of the DECB-——if the field contains 
zeros, the RPL has not been assigned to a DECB 
CBISAM only) 


Address of the ISAM interface buffer 
associated with the RPL (the buffer is 
required for locate mode processing, data only 
retrieval, dynamic buffering, and BISAM 
stand-alone write) 

Address of the next RPL in the ISAM interface 
RPL pool-—if the RPL is the last RPL in the 
pool, this field contains zeros 


2 
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Request Parameter List Extension (RPLE)—Description and Format 


Offset 
Dec (Hex) 


16(10) 


17(11) 
20014) 
24018) 


1 


tes and 


n 
Bit Pattern Field Name Description 


RPLIITSB Test-and-set (TS) byte-—this field is used to 
acer the assignment of the RPL to a BISAM 
C 


Reserved 
RPLSAVE Register save area 
RPLSAVE2 Register save area 


SRB-“SERVICE REQUEST BLOCK 


SSL—-"“SWAP SAVE LIST 


The SRB is used by the I/0 supervisor to dispatch I/0 processing 
for a request. It identifies the address space in which 
processing is to be done. 


The format of the SRB is given in the Debugging Handbook and 
Data Areas microfiche. 


The SSL contains up to 16 entries that identify control blocks 
that are to be chained after Open has otherwise completed 
successfully. Deferring chaining makes it unnecessary to 
unchain the control blocks should Open fail. 


Open uses the Compare-and-Swap instruction to chain or alter 
storage that is subject to simultaneous alteration by two or 
more tasks. 


The SSL is pointed to by OPWA (called the ACB work area). 
Additional SSLs are chained as required. 


Swap Save List (SSL)—Description and Format 


offset 
Dec (Hex) 


0¢0) 
1¢1) 
4(4) 
12(C) 


16(10) 
18(12) 
20¢14) 
20¢14) 


24(18) 


L¥26-3907-1 


BY 


1 


PO N Pf -& Cc WW 


ms 


16 


tes and 
t Pattern Field Name Description 


SSLSUBPL Subpool number of the SSL 
SSLLENTH Length of the SSL 
SSLID Identifier: "'IDASSL’ 


SSLNXPTR Address of the next SSL (zero for the last SSL 
in the chain) 


SSLACEN Number of active entries 
Reserved 


SSLENTRY Entries for control blocks to be chained: 
SSLSWPTR aa paca of the word in which SSLSWAP is to be 
place 


SSLSWAP The value that is to be placed at the address 
given is SSLSWPTR 
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The UPT describes the upgrade set of a base cluster. It 
contains an entry for each alternate index in the upgrade set. 
It is pointed to by the BIB (CBIBUPT). 


Upgrade Table (UPT)=—Description and Format 


offset 
Dec (Hex) 


0¢0) 
0¢0) 
1¢1) 


2(2) 
4(4) 
8(8) 
12(C) 
13(D) 
14(E) 
16(10) 
16¢10) 
20¢014) 
24(18) 
25019) 
26(1A) 
27(1B) 
28(10) 


32(20) 


UPT Entry 


0¢0) 


0¢0) 
4(4) 


Bytes and 
Bit Pattern 


4 


== —_—) 7 


XXX KKKXK 


Ee = SF HH A 


N 


N 


rb YFP FES | FEF LE Lx» 


Sa] 
a 


12 
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Field Name Description 


UPTHDR 
UPTID 
UPTFLGO 
UPTPWS 


UPTLEN 
UPTNEW 
UPTOLD 
UPTRSC 
UPTNOENT 


UPTLLEN 
UPTSA 
UPTWORK1 
UPTLSA 


UPTBEREG 
UPTBERCD 


UPTSARES 
UPTR14 


UPTR15 


UPTAXENT 


UPTRPL 
UPTFLG1 


UPTF1LST 
UPTF1ATV 
UPTF1INUK 
UPTF1NOP 
UPTFINRF 
UPTFIKEY 


Header: 
Control block identifier, X'45' 
Flags: 


Continue with scan 
Reserved 


Length of the UPT 

Address of the new alternate-index record 
Address of the old alternate-tndex record 
Resource byte—-used to serialize updates 


Number of alternate indexes in the upgrade set 
Cand of antries in the UPT) 


Largest sum of key length plus the key's 
relative position ina data record 


Save area: 
Address of base RPL 


Last save area 

RPLERREG value for the base cluster 
RPLERRCD value for the base cluster 
Reserved 

Resource byte 


Address to which IDA019R4 returns after I/0 is 
issued for upgrading 


Rest of save area 


Stee for an alternate index in the upgrade 
set: 


Address of the upgrade RPL 
Flags: 
te 1: 


. * M4 
This is the last entry in the UPT 


This entry is active for an upgrade operation 
The alternate index can have nonunique keys 
The alternate index 15s not open 

A no-record-found error has occurred 

The key being processed is: 


0 Old 
1 New 
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Upgrade Table (UPT)—Description and Format 


offset 
Dec (Hex ) 


6(6) 


8(8) 


909) 
10¢CA) 
12(C) 


13(D) 


Bytes and 

Bit Pattern 
ool. 
ool 

1. 

-1.. 

ool. 

ool : 
Laas 
oL.. 

eee 
0 o X 
2 
1 
1 
2 
1 
X'80' 
X"40! 
X'20' 
X'10" 
3 


VAT~"VALID AMBL TABLE 
The VAT is used to check the validity of each AMBL that is built 


for processing a base key-~sequenced cluster. 
address of each AMBL. 
step TCB (TCBVAT). 


Field Name Description 


UPTF1RTY 
UPTFLUPG 


UPTF1BKO 
UPTF1ILOG 
UPTFIPHY 
UPTF1ERA 


UPTF1IPNU 
UPTFIPUD 


UPTFLALT. 


UPTRKP 


UPTPASS 


UPTLNCDE 
UPTBG 
UPTF1LOP 


The last operation is being retried 
The alternate index is being upgraded 


Byte 2: 

pA MPSraes operation is being undone (backed 
out) 

A logical error has occurred 

A physical error has occurred 

The operation requiring upgrade was delation 
CERASE) 

The operation requiring upgrade was insertion 
The operation requiring upgrade was update 
Entry has been modified 

Reserved 


Relative alternate-key position in a base 
record 


The number of this upgrade operation (pass 
through the upgrade set) 


Length of key, minus 1 

Length of RPLAREA field 

Last operation against the upgrade ACB 
Indicates an erase 

Indicates get for update 

Indicates put for update 

Indicates put no update 


Reserved 


It contains the 
The first VAT is pointed to by the job 


Valid AMBL Table (VAT)—Description and Format 


offset 
Dec (Hex ) 


0(0) 
0(0) 
1¢1) 
2(2) 
4(4) 
8(8) 


8(8) 


LY26-3907~-1 


Bytes and 
Bit Pattern 


Co UU ktlUCCUmTLQQlUmlCU SlCr lCUD 


Field Name Description 


VATHDR 
VATID 


VATLEN 
VATNEXT 
VATVSRT 


© Copyright IBM Corp. 


1974,1985 


Header: 

Control block identifier, X‘'11° 

Reserved 

Length of the VAT 

Address of the next VAT 

Used to update the use count and address of 
the VSAM shared resource table at the same 


time Cwith the CDS instruction) 
Reserved 


Data Areas 415 





Restricted Materials of IBM 
Licensed Materials - Property of IBM 


Valid AMBL Table (VAT)—Description and Format 


Offset Bytes and 

Dec (Hex) Bit Pattern Field Name Description 

11(B) 1 VATSHRP Maximum number of shared pools 

12(C) 4 VATVPTR Address of the VSRT vector table 
16(10) 4 VATPAMBL Address of the first AMBL in the primary chain 
20¢014) 2 VATVC Used for checking validity of AMBLs 
20¢€14) 1 VATVRT The number of this VAT on the chain 
21(15) 1 VATENO Number of entries in this VAT 

22(16) 2 Reserved 

24(18) 4 VATNAE Number of active entries in this VAT 
28(1C) 4x 16 VATAMBL Addresses of valid AMBLs 

92(05C) 4 VATSRA Pointer to sphere record area 

96(60) 4 VATCISTP Address of first CI substitution table 
100¢64) 4 VATCIPTP Address of CI pointer table 


VCRT-—-VSAM CHECKPOINT/RESTART TABLE 


Tha VCRT is used by VSAM checkpoint/rastart. The VCRT, which is 
mapped by IDAVCRT, is suballocated from VCRCORE in IDA0606C. It 
contains a count, by entry type, of each entry associated with 
the VCRT. There are three entry types: open, upgrade, and 
index. The VCRT is pointed to by the BIB (CBIBVCRT). 


VSAM Checkpoint/Restart Table (VCRT)—Description and Format 
Offset Bytes and 


Dec (Hex) Bit Pattern Field Name Description 
0¢0) 1 VCRID Control block ID, X*'80!° 
1¢1) 1 VCRFLAGI Flag bytes: 
Dice Bakes VCRUPGSW Entry type: 
1 = Upgrade 
0 = Open 
Skce Mace VCRLSR Local shared resources specified 
Ap Tae ee VCROUT Qutput ACB is open 
oe eX XXXX Reserved 
2(2) 2 Reserved 
404) 8 VCRIDNM VCRT control block name-—IDAVCRT 
12(C) 4 VCRCOREH Address of first VCRCORE header 
16¢€10) 2 VCROPNCT Open antry count 
18¢12) 2 VCRUPGCT Upgrade entry count 
20(14) 2 VCRIDXCT Index entry count 
22(16) 2 Reserved 
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VSAM Checkpoint/Restart Table (VCRT)—Description and Format 


Offset Bytes and 
Dec (Hex) Bit Pattern Field Name Description 


24(18) 4 VCRCISIZ Size of largest control interval in the sphere 
28(1C) 4 VCRSPHPT Address of sphere block HEB save area 

32(20) 4 VCRRBUF Address of the repositioning buffer, or zeros 
36(24) & VCROPN Address of first VCRT open entry 

40°28) 4 VCRUPG Address of first VCRT upgrade entry 

44(2C) 4 VCRIDX Address of first VCRT index entry 


The VCRT open entry is used by VSAM restart to rebuild the control blocks needed for 
a valid restart. The format is: 


0(0) 4 VCRHEBS Address of the HEB save area (zeros if the 
cluster is part of the upgrade set) 
404) 4 VCRAMBL Address of the user's AMBL 


The VCRT upgrade entry points to the upgrade AMBL and the HEB save areas to be 
processed by VSAM restart. The entry exists only if the upgrade set for this data 
set was open at checkpoint time. The format is: 


0¢0) 4 VCRUHEBS Address of the HEB save area 
404) 4 VCRUAMBL Address of the upgrade AMBL 


The VCRT index entry contains ICWA and buffer addresses for the index level it 
represents. The entry exists only if the base data set is a key-sequenced data set 
open for create mode processing. There is one entry for each index level that 
exists at open time. The format is: 


060) 4 VCRICWA Address of the ICWA 
4(4) 4 VCRBUFPT Address of the associated buffer 


VCRCORE is created by VSAM checkpoint CIDA0CO06C) and freed by the VSAM 
checkpoint/restart cleanup routine in IDA0196C. The first VCR core header is 
pointed to by VCRCOREH (12¢€C)) in the VCRT. The format is: 


0(0) VCRCHDR VCR core header 
0(€0) 8 VCRCNM VCRCORE ID-——VCRCORE 
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8(8) 
12¢C) 


16¢10) 
20(€14) 
24(18) 


& ff Gre fF 


VCRCNEXT 
VCRCDESC 


VCRCSP 
VCRCLEN 


VCRCPTRA 
VCRCLENA 
VCRCDATA 
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Address of next VCR core header 


Cleanup information ) 


Subpool number containing this block 
Length of this block 


Address of first available byte in this block 
Length of available storage in this block 


Storage for data (minimum 4072 bytes) 


The HEB save area is pointed to by the open (VCRHEBS) or upgrade (VCRUHEBS) entries 
The format of the save area is: 


of the VCRT. 


0¢0) 


0¢0) 
2(2) 


3(€3) 
4(4) 


8(8) 


0¢€0) 


0¢0) 
0¢0) 
1¢1) 
4(4) 
8(8) 


1 
diiers. & eeese 
oe) ra eer ee 
KK MXKX 
1 
4 
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VCRHHDR 


VCRHNENT 
VCRHFLG 
VCRHFCON 
VCRHFREL 
VCRHCID 
VCRHNEXT 


VCRHENT 


VCRHEFMN 
VCRHESP 
VCRHELN 
VCRHESPT 


Header for each CMB entry CCMBPTRS) or for 
BIBSPHPT 


Number of entries tn header element chain 

Flag byte: 

This 18 a continuation of a previous CMB entry 
Issue FREEMAIN at restart time 

Reserved 

Relative CMB entry number, or 0 for BIBSPHPT 


Address of next HEB save area header for 


cluster ) 


The following fields are repeated once for 
each entry in the header element chain 


Header element saved at checkpoint as defined 
by IDAHEB mapping macro 


FREEMAIN information: 
Subpool number 
Length of storage 
Address of storage 


Remaining content of header element 


2 
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VGTT-"VSAM GLOBAL TERMINATION TABLE 


specially freed if an error prevents it from being freed 


( The VGTT identifies global virtual storage that may need to be 
There are various types of VGITTs for: 


normally. 


e Keeping track of an address space's use of a global VSAM 
resource pool (for processing with global shared resources) 


° Keeping track of certain control blocks (sets of IOSB, SRB, 
and PFL) that are kept in global storage for processing with 
local shared resources (the normal pointers to these control 
blocks are in unprotected local storage—the VGTT is in 
global storage, adjacent to them) 


° Keeping track of control blocks during the opening of a 
catalog, a catalog recovery area, or the mass storage volume 
inventory data set (all of whose control blocks are kept in 
global storage 


e Keeping track of certain control blocks (sets of IOQSB, SRB, 
and PFL) that are kept in global storage for processing a 
reas te set and all related data sets (such as alternate 
indexes 


° Keeping track of control blocks CECBs and WAITLIST if also 
GSR) that are kept in global storage for stage by key range 
processing. 


The VGTT is pointed to by the ASCB Caddress space control 


block). It is chained to the next VGTT for the address space. 
VSAM Global Termination Table (VGTT)—Description and Format 
Offset Bytes and 
Dec(Hex) Bit Pattern Field Name Description 
= 0¢0) 4 VGTTID Control block identifier, '"VGTT' 
404) 1 VGTTTYPE VGTT type indicator: 
1 ae VGTTSDS VGTT is for system data set 
oa ee VGTTGSR VGTT is for processing with global shared 
resources-~—VGTTVUSE is used 
a ie VGTTLSR VGTT is for processing with local shared 
resources 
Sl aie VGTTCTLG VGTT is for opening a catalog, a catalog 
recovery area, or the mass storage volume 
inventory data set 
Poco, Maren VGTTOPEN VGTT is for processing a user's data set 
without shared resources 
eA a eee VGTTCBIC Opened with control blocks in common storage 
area 
‘ xX Reserved 
5(5) 1 Reserved 
6(6) 1 VGTTGSRK GSR key type, if VGTTGSR is on 
707) 1 VGTTSP Subpool number of the VGTT and of the global 
storage it protects 
8¢8) 4 VGTTSIZE Length of the VGTT 
12¢C) 4 VGTTNEXT Address of the next VGTT (zero for the last 
VGTT in the chain) 
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VSAM Global Termination Table (VGTT)“—~Description and Format 


Offsat 


Dec(Hex) 


16(10) 


20¢14) 


24018) 


28(1C) 
32¢20) 


Bytes and 
Bit Pattern 


4 


VL 


VIOT-—-VALID IOMB TABLE 


The VIOT contains the address of each valid IOMB within a VSAM 
resource pool (for processing with shared resources). 
pointed to by the VSRT CVSRTVIOT) and by each AMB associated 
with the resource pool. 


Valid IOMB Table (VIOT)—Description and Format 


offset 
Dec (Hex) 


0(€0) 
0¢€0) 
1¢€1) 
2(2) 
4(4) 


Bytes and 
Bit Pattern 


4 
1 
1 
2 
4xn 


VMT——-VOLUME MOUNT TABLE 


Offset 
Dec (Hex) 


0¢€0) 
0¢0) 
1¢€1) 


Field Name 
VGTTBIB 


VGTTVUSE 


VGTTPSB 


VGTTCORE 


Field Name 
VIOHDR 
VIOID 


VIOLEN 
VIOPTR 


Description 

Address of the base information block 
user's data set and all related data 
Csuch as alternate indexes) 

For a VGTT for global shared resource 
use count that was contributed by the 
processing of the user's data set and 
related data sets. 

Address of the protected sphere block 
contains HEBs for use by virtual-stor 
management) 

Reserved 


For a VGTT for local shared resources 
virtual-storage area the VGTT protect 


Description 

Header 

Control block identifier, X'16"' 
Reserved 

Length of the valid-IOMB table 


Address of a valid IOMB; this field i 
repeated n times 


for the 
sets 


s, the 
all 


Cwhich 
age 


» the 
Ss 


It 1s 


The VMT identifies and describes volumes that are mounted for a 
base cluster and all clusters associated with it for processing. 


There is a VMT for each device type. 


to by the BIB (BIBVMT). 
Volume Mount Table (VMT)—Description and Format 


+ fe and 
Bit Pattern 


4 
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Field Name 
VIOHDR 
VMTID 


Description 
Header 
Control block identifier, X'l2' 


Reserved 
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Volume Mount Table (VMT)——Description and Format 


Offset Bytes and 

Dec(Hex) Bit Pattern Field Name Description 

2(2) 2 VMTLEN Length of the VMT 

4(4) 4 VMT NXT Address of the next VMT 

&8(8) 2 VMTNOVOL Number of volume entries (n) in the VMT 

10¢€A) 3 Reserved 

13(D) 3 VMTDEV Device information: 

13(D) 1 VMTDVOPT Device options 

14(E) 2 VMTDVTYP Device class and type 

16¢10) 16x Wn VMTVOL Volume entry for a volume to be mounted: 

16(€10) 4 VMTUSECT Use count 

20¢14) 1 VMTVFLG1 Volume flags: 
bets. «.bu4 VMTOPEN The volume is being processed by Open 
~XXX XXXX Reserved 

21¢15) 1 Reserved 

22(16) 6 VMTVLSER The volume's serial number 

28(10) 4 VMTUCB Address of the UCB for the volume 


VSI-~"VSAM SHARED INFORMATION BLOCK 


The VSI is created at open time in subpool 241 and is pointed to 
by the AMB. A VSI is built for each data set opened with share 
options (4,3) or (3,3) and resides in common storage under a 
protect key of zero. The VSI is the block used with CBUF 
(Control Block Update Facility) processing to maintain other 
control block information for users sharing the same data set. 


VSAM Shared Information Block (vSI)—Description and Format 


pec(Hex? Bit pattern Field Name Description 
0¢0) 1 VSIID Control block binary ID=X'17' 
1¢1) 1 VSIKEY Project key of VSI 
2(2) 2 VSILEN Size including VSI entries 
4(4) 3 VSIVID Visual ID='"VSI' 
707) 1 VSICATLN Catalog name length 
8(8) 4 VSINEXT Pointer to next VSI in chain 
12(C) 4 VSICACB Pointer to catalog ACB for data set 
16(10) 44 VSIDSN Data set name 
60(3C) 1 VSIFLAGI VSI indicator flags 
| a ee ee VSIUSE VSI being modified by the SVC 
~XXX XXX Reserved 
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VSAM Shared Information Block (VSI)—Description and Format 


offset 
Dec(Hex) 


61¢03D) 
62°3E) 
64(40) 
68044) 
70046) 


71¢€47) 
72648) 
76(04C) 


80050) 
80(50) 


84(54) 
88(58) 
92(5C) 
98(62) 
100(64) 
104(68) 
108(6C) 
109(6D) 
110(6E) 


IDAVSRT-—VSRT VECTOR TABLE 


offset 
Dec (Hex } 


0(0) 
0¢0) 
1¢1) 


Bytes and 
Bit Pattern 


1 


= ee NH FS | 


oXKX KKXX 


no --& F&F HLH FH NY O&O FP HLH HO HL LHL ee 


Field Name Description J 
VSIDSLN Data set name length 
VSIXMTL Transmitted data length 
VSILVL VSI level number 
VSINIL Number of index levels 
VSI indicator flags: 
VSIESET Data set may not be extended by EOV 
Reserved 
Reserved 
VSTHLRBA REA cf high level tndex record 
VSISSRBA RBA of first sequential set record 
VSTENTRY Entry for ARDB information 
VSIHKRBA RBA of CI with high key 
VSIHRBA High used RBA 
VSIERBA High allocated RBA 
VSIVOLSR Serial number of high RBA volume 
VSIRELNO Catalog volume group number 
Reserved 
Reserved J 
VSIPRF ARDPRF field from ARDB 
VSIFLAG2 ARDB field ARBTYPE 


Reserved 


The VSRT vector table contains the addresses of each VSRT for 
multiple local shared resource (LSR) pools. The VSRT vector 
table is pointed to by tha VAT CVATVPTR). 


VSRT Vector Table (IDAVSRT)—Description and Format 


Bytes and 
Bit Pattern 


8 
2 
1 
1 


MXM KKK 
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Field Name 


VSRTTSRT 


VSRTTFLG 
VSRTTANY 


Description 

Used to update the use count and address of 
the VSAM Local Shared Resource (LSR) pool id=0 
Reserved 

IDAVSRT flags 


LSR pool is to reside above 16 megabytes 
Reserved 


J 
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VSRT Vector Table (CIDAVSRT)—Description and Format 


Offset Bytes and 

Dec (Hex) Bit Pattern Field Name Description 

2(2) 2 VSRTTUSE Use count in the VSRT 
404) 4 VSRTTPTR Address of the VSRT 


VSRT“-VSAM SHARED RESOURCE TABLE 


The VSRT contains the addresses of buffer pools and PLH pools in 
the resource pool and addresses of various control blocks built 
during the processing of a BLDVRP macro. For local shared 
resources (LSR), the VSRT is pointed to by the VSRT Vector Table 
CVSRTTPTR); for global shared resources (GSR), it is pointed to 
by the AMCBS (CBSVPTR), which is described in Catalog Diagnosis 


Reference. 
VSAM Shared Resource Table (VSRT)—Description and Format 
Offset Bytes and ; 
Dec( Hex) Bit Pattern Field Name Description 
0(0) 1 VSRTBKID Control block identifier, X'15° 
1(1) 1 VSRTKEY Key of GSR user 
2(2) 2 VSRTLEN Length of the VSRT 
4(4) & VSRTID Visual identifier, "VSRT’* 
8(8) & VSRTEOV Address of EOQV's RB for GSR 
12¢C) 2 VSRTFLGS Flags: 
Byte 1: 
ice eek VSRTGSRF Global resource pool 
Sekvetiw’. etoee VSRTLSRF Local resource pool 
eds VSRTIOBF I/O-related control blocks are fixed in real 
storage 
ele de eres VSRTBFRF Buffers are fixed in real storage 
eee XKKX Reserved 
Byte 2: 
xXx XXX Reserved 
14(E) i VSRTKL The maximum key length of the data sets that 
are sharing the resource pool 
15(F) 1 VSRTSTRN The total number of placeholders required for 
all the data sets (specified in BLDVRP) 
16(10) 4 VSRTPLHH Address of the PLH header 
20(14) 4 VSRTBUFH Address of the BUFC header 
24(18) & VSRTCPAH Address of the CPA header 
28¢(1C) 4 VSRTWAH Address of the working storage header (CWSHD) 
32(20) 4 VSRTVIOT Address of the valid-IOMB table 
36024) &x VSRTCSL Entries for gotten storage: 
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VSAM Shared Resource Table (VSRT)—Description and Format 


Offset 
Dec (Hex ) 


36 (24) 


37(25) 
40¢28) 
44(2C) 


45(2D) 


Bytes and 

Bit Pattern 

1 

3 

4 

1 

; eer 

phe: séra-e 

ig ee. igus % 

Ide eee 
nee toe 

e 8 @ gle dice 

ee | 

3 


Field Name 
VSRTCSSP 


VSRTCSLN 
VSRTCSAD 
VSRTCSLF 


VSRTCSFX 
VSRTCSVS 
VSRTCSGT 
VSRTCSPF 
VSRTCSWS 


VSRTCSPL 
VSRTCSIO 
VSRTCSBH 


WAX-"WORK AREA FOR PATH PROCESSING 


Description J 


The number of the subpool the storage is 
located in 


Length of the storage 


Address of the storage 


Flags: 

The storage is fixed in real storage 
The storage contains the VSRT 

The storage is in GSR key 

The storage contains the page fix list 
The storage is for a work area (working 
storage) 


contains PLHs 
contains IOMBs 
contains a buffer 


The storage 
The storage 
The storage 


Reserved 


The WAX contains addresses and other information required for 


processing a path. 


It is pointed to by the PLH CPLHWAX). 


Work Area for Path Processing (WAX)~~Description and Format 


Offset 
Dec (Hex ) 


0¢0) 
1¢1) 


2(2) 
4(4) 


6(6) 
7¢(7) 
8(8&) 


12(C) 
16(¢10) 
20¢14) 


424 


Bytes and 
Bit Pattern 


1 


1 
Lge: axe 
here es 


ool. .. 


oe eX KKXXX 


2 
2 
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Field Name 
WAXID 
WAXFLG1 


WAXSRAB 
WAXPUG 


WAXPS 


WAXLEN 
WAXPL 


WAXXXXX2 
WAXUREQ 
WAXIRPL 


WAXURPL 
WAXRCDA 
WAXXPTR 


Description 

Control block identifier, X'"73' 

Flags: 

Catalog recovery area built in system storage 
The alternate index in the path is in the 
upgrade set 

The last operation against the path was a 
sequential PUT 

Reserved 

Length of the WAX 


Length of the alternate-~index record's 
potnters to base records 


Reserved 
User's RPL request type 


Address of the inner ("dummy") RPL that is 
used to gain access to the alternate index 


Address of the user's RPL 
Address 


Address of the current alternate-index pointer 
to a base record 


of the alternate~index record 


J 
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Work Area for Path Processing (WAX)-——Description and Format 


Offset Bytes and 

Dec(Hex) Bit Pattern Field Name Description 

24(18) & WAXEPTR Addrass of the byte beyond the last 
alternate-index pointer 

28(1C) 4 WAXBPLH Address of the PLH for the base cluster 

32(20) 4 WAXSRAA Address of the saved-record area 

36624) & WAXSRAL Length of the saved-record area 

40¢28) 4 WAXPPLH Pointer to path PLH 


WSHD-"-WORKING STORAGE HEADER 


The WSHD describes up to four blocks of storage used for work 
areas (working storage). It is pointed to by the AMB CAMBWSHD). 


Working Storage Header (NSHD)—Description and Format 


Offset Bytes and 
Dec(Hex) Bit Pattern Field Name Description 
0¢€0) 1 WSHDID Control block identifier, X'44' 
1¢1) 1 WSHDPOOL ee ea of tha subpool in which the WSHD is 
2(2) 2 WSHDLEN Length of the WSHD 
4(4) 4 WSHDNEXT Address of the next WSHD 
4(4) 1 WSHDGMTB GETMAIN resource byte 
8(8) 10 WSHDGMWA GETMAIN work area 
18¢12) 2 WSHDNUS Number of used slots (antries) in the WSHD 
200614) 4 WSHDGMRA GETMAIN rasult (return coda) 
24(18) 4 WSHDOCHN Address of ordered slot chain 
28(1C) 20 x 4 WSHDSLT Slot Cantry) for each block of working 
28(1C) 4 WSHDSAD wadeaes of thea storage block 
32¢20) 1 Flags: 
Seclve: <aeecats WSHDGSR Storage is in GSR key 
xx. XXX Reserved 
33¢21) 3 Reserved 


Working Storage Header (WSHD)——Description and Format 


offset Bytes and 

Dec(Hex) Bit Pattern Field Name Description 

36(24) 12 WSHDSGMW Honk ares for the GETMAIN for the storage 
oc 

36 (24) 4 WSHDSFM FREEMAIN field for the DLVRP macro 
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Working Storage Header (WSHD)—Description and Format 


offset 
Dec (Hex ) 


36(24) 


37¢€25) 
40(28) 
44(20) 


46(2E) 


47(2F) 
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Bytes and 


Bit Pattern 


1 


Deiat ce teteos 


XXX MKXKX 


Field Name Description 


WSHDSFSP 


WSHDSFLN 
WSHDSONX 
WSHDSBV 


WSHDSFLG 
WSHDSFNO 


WSHDSBM 


The number of the subpool in which the storage 
block is located 


Length of the storage block 
Address of the next slot on ordered slot chain 


Number of bytes represented by each bit in 
WSHDSBM 


Slot flags: 


The storage block has no bytes available 
Reserved 


Bit mask Ceach bit indicates whether the bytes 
it represents are used-——l1, or not used—0D) 
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DIAGNOSTIC AI 


This chapter provides several aids that can be useful when you 
are trying to diagnose difficulties with VSAM modules. These 
aids include: 


e A description of DFP XREF Listings, which is published on 
microfiche cards 


e A list of messages issued by VSAM, with a list of the 
module(s) causing the message to be issued and a list of 
function codes for Open, Close, and End of Volume 

e A list of macros that VSAM uses and their functions 


e A description of GTF, how VSAM requests it, and what it 
provides in the way of VSAM APAR information 


e A list of return codes 


e A description of Virtual-Storage Management and its control 
blocks 


e A description of Open, Close, and End-of-Volume diagnostics 
e A list of ABENDs issued by VSAM 


Additional aids can be found in other parts of the book and in 
the program listings. These include: 


e Register contents on entry to a module, which are under 
"INPUT™ in the module prologs 


e Use of registers and equated names for registers, which can 
be found under "NOTES" in the module prologs 


o Error codes, which are under "EXIT-ERROR" in the module 
prologs 


e A list of modules, their external procedure names, their 
component, and their associated method of operation 
diagrams, which is in the "Module Directory" 


e A list of external procedure names and their modules, which 
is in the "External Procedure Directory" 


@e Definitions of terms and abbreviations used in the book, 
which are in the "Glossary" 


e Page references for the subjects covered in this book, which 
are in the "Index" 


MICROFICHE CROSS-REFERENCE AIDS 


The DFP XREF Listings (microfiche) contains a "Symbol Where Used 
Report." 


HOW TO READ THE SYMBOL WHERE USED REPORT 


L¥26~-3907-1 


The "Symbol Where Used Report™ contains three kinds of 
information. 


e A list of symbolic names. This includes field names, 
symbolic address names, return-code names, constant names, 
and flag-bit names, in alphabetic order from top to bottom. 


The lower-right corner of each page contains the first and 
last names listed on the page. 
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A list of modules that refer to each symbolic name, in 
alphabetic order from left to right. 


A code indicating how each module refers to the symbolic 


name: 
W Write 
R Read 


C Compare 


The data field or bit value was modified by at 
least one line of code in this module. If the 
module contains a statement "A = B” (that is not 
part of an IF statement), the module's use of 
WAN 15 to modify it 


The data field or value was referred to by at 
least one line of code in this module. If the 
module contains a statement "A = B,"™ the 
module's use of "B" is to refer to it. 





The data field or value was compared with 

another field. If the module contains as 
statement "If A=B, THEN...," the module's use of 
WAN is to compare it with "B. " (The nodal: s use 
of "B" ig to refer to it, not to compare it.) 


Other codes are explained in the "Access Codes" at the bottom of 
each page in the table. 
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MESSAGES 


Message 


Number 


Message 
Text 


Messages IDA001 through IDA025 refer to an incorrectly coded macro. 





IDAO001 INVALID POSITIONAL PARAMETER, xxx—-IGNORED 

IDA002 xxx KEYWORD REQUIRED—-NOT SPECIFIED 

IDA003 INVALID VALUE, yyy, SPECIFIED FOR xxx KEYWORD 

IDA004 xxx KEYWORD NOT VALID FOR EXECUTE FORM-~IGNORED 

IDA005 INVALID OR DUPLICATE SUBLIST ITEM FOR xxx KEYWORD, yyy 
IDAC06 xxx VALUE, yyy, NOT VALID FOR LIST FORM 

IDACO7 LOGIC ERROR IN MACRO xxx 

IDA008 INCOMPATIBLE SUBLIST ITEMS, yyy AND zzz, FOR xxx KEYWORD 
IDA009 xxx CONTROL BLOCK KEYWORDS SPECIFIED—-ONLY ONE ALLOWED 
IDA010 EXIT ADDRESS REQUIRED FOR xxx KEYWORD-—-NOT SPECIFIED 
IDA011 xxx IS NOT A VALID yyy KEYWORD--IGNORED 

IDA018 VTAM KEYWORD, xxx, SPECIFIED WITHOUT SPECIFYING AM=VTAM 
IDA019 KEYWORDS xxx AND yyy ARE INCOMPATIBLE 

IDA020 VTAM SUBLIST ITEM, xxx, SPECIFIED FOR yyy KEYWORD WITHOUT SPECIFYING 


AM=VTAM 


w = =sIDAN2I xxx and yyy KEYWORDS MUST BE SPECIFIED TOGETHER BUT ONE IS MISSING 


IDA022 CONFLICTING SUBLIST ITEMS WERE SPECIFIED FOR xxx KEYWORD 
IDA024 xxx, A VSAM KEYWORD SPECIFIED FOR A NON-VSAM CONTROL BLOCK 
IDAO025 WWW, yyy, 222 CONFLICTING SUBPARAMETERS IN xxx KEYWORD, www ASSUMED 
Detected Issued 
By By 
IECOO1A M ddd,ser,jjji,sss,dsn IDA0192V IDA0192V 
IECOO3E R ddd,ser,j13,8s55 IDA0192V IDA0192V 
C, SPAGESPRNT sn 
IECO14E D dddd IDA0192V IDA0192V 
IECO70I rel(sfi)j-ccc,jjji,sss,ddn, IDA0192D IDA0192P 
ddd,vol,cin,dsn,cat IDA01925S 
(TECO70I is an End-of-Volume IDA0192V 
message, ) IDAOS557A 
IDA0557B 
IDA0557X 
IFGO551F 
IECLOLA M ddd,ser,jjj,s5s,dsn IGGOCLBL IDA0192V 
IEC111E D, ddd,ser IGGOCLBL IDA0192V 


IEC159I Fl3-re,mod 1,858,ddnl-#],ddd 
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Message 
Number 


IEC1611 


IEC2511I 


IEC252I 


IEC3311 
IEC332I1 
IEC333I 
IEF1I75I1 


IEF4¢471 


IEF4¢48I 


TEF4¢491 


THJO09I 


Message 
Text 


cl(sfi) J-ccec,jij dd 
ddd,vol,cln,dsn,cat 
C(ITECI61I is an Open message.) 


rel(sfi)J-ccc,jij,s58s,ddn 
ddd,vol,cln,dsn,cat 


(IEC251I is a Close message.) 


rel(sfi)l-cce,iji,sss,ddn, 
ddd,vol,cln,dsn,cat 
(TEC252I is a Close 


(TYPE=T) message. ) 


ro-crs,jj1,5383, func,mmm 
funclfunc...] 


terr,xx,cat 


AMP KEYWORD nnnnnnnn 
DUPLICATE OR CONFLICTING 
PARM STEP NOT EXECUTED 


AMP KEYWORD nnnnnnnn IS 
INVALID STEP WAS NOT 
EXECUTED 


AMP KEYWORD nnnnnnnn VALUE 
xxxxxx IS TOO LARGE STEP 
NOT EXECUTED 


AMP KEYWORD nnnnnnnn REQUIRES A 
DECIMAL VALUE STEP NOT EXECUTED 


ERROR ON ddn 
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Detected 
By 


IDA0192A 
IDA0192C 
IDA0192D 
IDA01925 
IDA0192V 
IDA01922 
IFGO192A 


IDAOCEA2 
IDA0192C 
IDA0192D 
IDA01925S 
IDA0192V 
IDA0200T 
IFGO200V 


TDA0192C 
IDA0192D 
IDA01925 
IDA0192V 


IDA0231T 
IGcod02c 


IEFVAMP 


IEFVAMP 


TEFVAMP 


IDAOQAO5B 


Issued 


By 
IDA0192P J 


IDA0192P 


IDA0192P 


IDAOAO5B 


FUNCTION CODES FOR VSAM OPEN, CLOSE, AND END-OF-VOLUME MESSAGES 


When an error occurs during Open, 
the message that is issued will 


processing for a VSAM data set, 


contain (besides error identification, job, 
volume serial number, and names of cluster, data 
that contains a function code. 


device address, 


set, and catalog) a field, ccc, 
The following lists these function codes and ties each to the 

module that detected the error and the operation being performed 
when the error was detected. 
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Close, or End-of-Volume 


step, and DD names, 


J 
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Function 
Code 


Open 


LY26~-3907-1 


Module That 


Detected 
Error 


IDA0192C 
IDA0192C 


IDA0192C 
IDA0192C 
IDA0192C 
IDA0192C 
IDA0192C 
IDA0192C 
IDA0192C 
TDA0192C 
IDA0192C 
IDA0192V 
IDA0192V 
IDA0192V 
TIDA0192V 
IDA01925 
IDA01925S 
IDA0192D 
TIDA0192D 
IDA0192D 
IDA0192D 
IDA01922 
IDA01922 
IDA01922 
IDA0192Z 
IDA0192Y 
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Operation Being Performed When 
Error Was Detected 


Initialize for catalog interface processing. 
Determine which data sets are associated 
detecaine catalog, end check password: 
Datermine data-set attributes. 

Get volume information. 

Update "opan"” indicator in catalog. 

Updata catalog whan data set is being closed. 
Ratriave volume timestamp. 

Racord-management catalog update. 

Update preformat indicator in catalog. 
Retrieve 44-byte cluster name. 

Retrieve 44-byte component name. 

Initialize for mounting and verify volume. 
Check volume timestamp. 

Handle messages. 

Mount volume. 

Initialize for SMF processing. 

Build SMF record. 

Initialize for staging. 


Build UCB list. 


Build list for ACQUIRE/RELINQUISH (stage/destage). 


Issue ACQUIRE or RELINQUISH. 

Initialize for building control blocks. 
Determine number of buffers needed. 
Build buffers. 

Build control blocks. 

Build string blocks. 
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Function 
Code 


Open 
55 
60 
61 
62 
63 
70 
71 
80 
81 
82 
83 
84 
85 
87 


88 
89 
90 
93 
95 
96 
99 


Close 
100 
101 
102 
103 
104 
105 
106 


107 
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Module That 


Detected 
Error 


IDA0192X 
IDA0192B 
IDA0192B 
IDA0192B 
IDA0192B 
IDA0192W 
IDA0L92W 
IFGO1L93A 
IDAO1IZA 
IDAO192ZA 
IDA0192F 
IDA0192B 
IDA0192F 
IDA0192A 


IDA0192F 
IDA0L92F 
IDA01L92F 
IDAOL9I2A 
IDAO192A 
IDA0192A 
IFGO192B 


IFGO200V 
IDAOGZ00T 
IDAO2Z00T 
IDA0200T 
IDA02Z00T 
IDA0200T 
IDA0200T 


IDA0200T 
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Operation Being Performed When 
Error Was Detected 


Get VVRs. 

Module initialization. 

Locate data-set attributes and check them for validity. 
Volume processing. 

Preformat extent. 

Initialize for building channel program. 
Build channel program area. 

Check return codes from IFG0191X or IFGO191Y. 
Initialize for VSAM Open processing. 

Verify ACB. 

Fix control biocks in real storage. 

Allow subtasks to share data set. 

Mount and verify volumes. 


Determine whether to connect base cluster to an 
existing structure or generate a new structure. 


Open base cluster. 

Open alternate index in upgrade set. 

Open alternate index in path. 

Build a dummy DEB. 

Tarminate VSAM Open processing. 

Clean up after an error in Opan processing. 


Error processing for ACB baing processed on a system 
not generated for VSAM. 


Read JFCB. 

Initialize for VSAM Close processing. 
Check validity of AMBL and DEB. 
Complete deferred write raquests. 
Close path. 

Close base cluster. 


Close sphere (close upgrade alternate indexes and 
free storage). 


Close upgrade sat. 
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Module that 


Function Detected 
Code Error 
Close 

108 IDA02Z00T 
109 IDA0200T 
110 IDA0200B 
111 IDA0200B 
112 IDA0Z00B 
113 IDAO0200B 
114 IDA02Z00B 
115 IDAO2O00B 
116 IDS0200B 
148 IDAO0200T 
149 IDAOCEA2 
150 IGC0002C 
151 IDA0231T 
152 IDA0N231T 
153 IDA0231T 
154 IDA0231T 
155 IDA0231T 
156 IDA0231T 
157 IDA0N231B 
158 IDA0231B 
159 IDA0231B 
160 IDA0231B 
161 IDA0231B 
End of Volume 

200 IFGO551F 
201 IDA055785 
202 IDA0557B 
203 IDA0557B 
204 IDA0557B 
205 IDA0557B 
206 IDA05578B 
LY26-3907-1 
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Operation Being Performed When 
Error Was Detected 


Process volume mount table. 

Close dummy data set. 

Module initialization. 

Check validity of AMBLs and DEBs. 


SMF processing. 


Update statistics and RBA information in the catalog. 


Free storage for control blocks. 

Write a buffer. 

Update VVR. 

Force deletion of VSAM global resource pool. 
Force deletion of VSAM global resource pool. 
Read JFCB. 

Initialize for VSAM Close (TYPE=T) processing. 
Check validity of AMBL and DEB. 
Complete deferred write requests. 
Close (TYPE=T) path. 

Close (TYPE=T) base cluster. 

Close (TYPE=T) upgrade set. 

Module initialization. 

Check validity of AMBLs and DEBs. 
Update statistics and RBA information. 
SMF processing. 


Write a buffer. 


Read JFCB. 

Initialize for VSAM End-of-Volume processing. 
Locate and mount volume. 

Allocate space. 

Switch volumes. 

Build control blocks. 

Update SMF record. 


Diagnostic Aids 


Function 
Code 


Error 


End of Volume 


207 
208 
209 
210 
211 
228 
229 
230 
231 
232 
233 


IDAOS57A 
IDA0557B 
IDA0557A 
IDA05578B 
IDA0557B 
ICYMMSRV 
ICYMMSRV 
ICYMMSRV 
ICYMMSRV 
ICYMMSRV 
ICYMMSRV 


MAPPING MACROS 


Module that 
Datectad 
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Operation Being Performed When 


Error Was Detected 


J 


Preformat extent. 


Record-management, catalog update. 


Reset control blocks. 
Reatriave VVR. 
Extend. 


Initialization processing 


Media Manager CONNECT processing 


Media Manager EXTEND processing 


Media Manager DISCONNECT processing 
Media Manager CATALOG READ processing 


Media Manager CATALOG UPDATE processing 


The following tables list VSAM and control program macros and 
explain what they do. The macros are divided into those that 
define control blocks and data areas (mapping macros) and those 
that issue executable code (action macros). 


J 


The following table lists macros that define the format of 
control blocks and data areas used by VSAM modules. 


Macros That Define Data Areas 


Macro Description 

ACB Builds an access~meathod control block CACB) at 
assembly time 

CVT Maps the communication vector table (CVT) 

ECB Maps the event control block 

IDAACQPL Maps the acquire range parameter list CAC@PL) 

IDAAIR Maps the alternate-index record 

IDAAMB Maps the access method block (CAMB) 

IDAAMBL Maps the access method block list CAMBL) 

IDAAMBXN Maps the access method block extension CAMBXN) 

IDAAMDSB Maps the access method data set statistics control 
block CAMDSB) 

IDAARDB Maps the address range definition block CARDB) 

IDAARWA Maps a recovery work area for the restart modules J 
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IDABIB 
IDABFR 
IDABLPRM 
IDABSPH 


IDABUFC 
IDACBTAB 


IDACIDF 
IDACLWRK 
IDACMB 
IDACNVPL 
IDACPA 
IDACSL 
IDACTREC 


IDADIWA 
IDADSECT 
IDADSL 
IDAEDB 
IDAELEM 


IDAEQUS 


IDAEN@RN 
IDAERMSG 
IDAERRCD 
IDAESL 

IDAFOREC 


IDAGENC 
IDAHEB 
IDAICWA 
IDAIDXCB 
IDAIICB 
IDAIIREG 


IDAIMWA 
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Maps the 
Maps the 
Maps the 
Maps the 


resources 


Maps the 


Maps the 
routine 


Maps the 
Maps the 
Maps the 
Maps the 
Maps the 
Maps the 


Maps the 
routines 


Maps the 


base information block (BIB) 
buffer control set 
resource pool parameter list CBLPRM) 


buffer subpool header (BSPH) for shared 


buffer control block (CBUFC) 


tables used by the control block manipulation 


control-interval descriptor field (CIDF) 
close work area 

cluster management block (CMB) 

convert keys/RRNs/RBAs parameter list CCNVPL) 
channel program area (CPA) 

core save list (CSL) 


work area built when the catalog management 
use Open, Close, or End of Volume 


data insert work area (DIWA) 


Maps miscellaneous data areas for checkpoint/restart 


Maps the 
Maps the 


Maps the 
argument 


DEB save list CDSL3 
extent definition block CEDB) 


control block manipulation routine's elemant 
control entry 


Defines the equates for the ISAM Interface: 
SYNAD—message-build routine 


Maps the 


RNAME structure for VSAM data sets 


Corp. 1974,1985 


Maps the ISAM interface: SYNAD message format 

Lists the VSAM Open and Close ACB error codes 

Maps the enqueue save list (ESL) 

Maps the work area for VSAM Open, Close, and End of 
Volume (the work area is called "FORCORE” in program 
comments) 

IDAFOREC issues IDAPDPRM, IEFJFCBN, and IEFJFCBX. 
Maps the GENCB header argument control antry 

Maps the header element block CHEB) 

Maps the index create work area (CICWA) 

Lists the VSAM control-block-identifier codes 

Maps the ISAM-interface control block (IICB) 
Defines the ISAM-interface register usage 


IDAIIREG issues IDAIICB, IDARPLE, IFGRPL, IHADCB, and 
THADCBDF 


Maps the index modification work area CIMWA) 
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IDAIOB 
IDAIOMB 
IDAIOSCN 


IDAIRD 
IDAIXSPL 
IDALPMB 
IDAMNTPL 


IDAMODC 
IDAOPWRK 
IDAPDPRM 


IDAPLH 
IDAPSL 
IDARBAPL 
IDARDF 
IDAREGS 


IDARMRCD 
IDARPLE 


IDARTMAC 
IDASHOW 
IDASRA 
IDASSL 
IDATEST 
IDAUPT 


IDAVAT 
IDAVCRT 


IDAVGTT 
IDAVIOT 
IDAVMT 
IDAVSI 
IDAVSRT 
IDAVUCBL 


IDAVVOLL 
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Maps the VSAM IOB extension 


Maps the I/O-management control block CIOMB) ; 
Maps the VSAM Open, Close, and End-of-Volume commonly 
used declarations 


Defines the index record 
Maps the index search parameter list CIXSPL) 
Maps the logical-to-physical mapping block CLPMB) 


Maps the 
CMNTPL) 


Maps the MODCB header argument control entry 
Maps the ACB work area for Open COPW or OPWRK) 


Maps the VSAM Gpen, Close, and End-of-Volume problem 
determination parameter list 


the placeholder (PLH) 


mount volume and acquire parameter list 


Maps 
Maps the page save list (PSL) 

Maps the RBA pairs list CRBAPL) 
Maps the record definition field CRDF) 


Defines register usage for all record-management 
modules 


Lists the record-management return codes 


Maps the ISAM-interface request parameter list 
extension (CRPLE) 


J 


Maps data structures for recovery routines 

Maps the SHOWCB header argument control entry 

Maps the sphere record area 

Maps the swap save list (SSL) 

Maps the TESTCB header argument control entry 

Maps the upgrade table (UPT) for upgrading alternate 
indexes 


Maps the valid-AMBL table (VAT) 

Maps the VSAM checkpoint/restart table (VCRT), the 
VSAM checkpoint/restart storage blocks (VCRCORE), and 
the HEB save area (VCRHEBSA). 

the VSAM global termination table (VGTT) 

the valid-IOMB table (VIOT) 

the volume mount table (VMT) 

the VSAM shared information block (VSI) 

the 


Maps the VSAM Open and End of Volume: 
verify UCB list 


Maps the VSAM Open and End of Volume: 
verify volume serial number list 


Maps 
Maps 
Maps 
Maps 
Maps VSAM shared resource table (VSRT) 


volume mount and 


volume mount and 2 
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IDAWAX 
IDAWSHD 
TECDIOCM 
TECDIOSB 
IECDIPIB 
IECDSECS 
TECDSECT 
TECRRPL 


TECSDSL1 
ITEESMCA 
ITEEVCHWA 


ITEEVRSWA 


IEFJFCBN 
ITEFJFCBX 
TEFJMR 
IEFTCT 
IEFTIOTI 
TEFUCBOB 
TEZABP 


IEZCTGFL 
ITEZCTGPL 
IEZDEB 
ITEZIOB 
TEZJSCB 
IFGACB 
IFGEXLST 
IFGRPL 
IGGCAXWA 
THAASCB 
THAASXB 
THADCB 
THADCBDF 
IHADECB 
THADSAB 
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of IBM 

Maps the work area for path processing (WAX) 

Maps the working storage header (WSHD) 

Maps the communication area of the I/0 supervisor 


Maps the I/0-supervisor control block (I0SB) 


Maps the I/O supervisor-—purge interface block CIPIB) 


Maps the DSECS 
Maps the common open/close work area 


ee the common O/C/EOV recovery routine parameter 
is 


Maps the SDSLI 
Maps the SMCA 


Maps a work area that the control program checkpoint 


passes to VSAM checkpoint 


Maps a work area that the control program restart 
passes to VSAM restart 


Maps the job file control block (JFCB) 
Maps the job file control block (JFCB) 
Maps the JMR 

Maps the TCT 

Maps the task input/output table (TIOT) 
Maps the unit control block CUCB) 


Maps the ABP——I/0-management communication vector 
table (module IDA1L21CV) 


Maps the catalog field parameter list (CTGFL) 
Maps the catalog parameter list CCTGPL) 

Maps the data extent block (DEB) 

Maps the input/output block CIOB) 

Maps the job step control block (JSCB) 

Maps the access-methed control block CACB) 
Maps the exit List CEXLST) 

Maps the request parameter List (RPL) 

Maps the catalog auxiliary work area (CAXWA) 
Maps the address space control block CASCB) 


Maps the address space extension control block CASXB) 


Maps the data set control block (DCB) 
Maps the data set control block (DCB) 
Maps the data extent control block (CDECB) 
Maps the data set association block (DSAB) 
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IHAFRRS 


THAIQE 
IHAPSA 
IHAPVT 
IHARB 
THARMPL 


THASDWA 


THASRB 
IHJSSCR 


IKJRB 
IKJTCB 
XCTLTABL 


ACTION MACROS 
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Maps recovery termination manager DSECTs for function 
recovery routines 


Maps the interrupt queue element (IQE) 
Maps the prefixed save area (PSA) 

Maps the page vector table (PVT) 

Maps the request block (RB) 


Maps the resource manager's parameter list for 
interfacing with VSAM task Close executor (CIDA0CEA2) 


Maps the STAE diagnostic work area (SDWA, also called 
the recovery termination communication area—RTCA) 


Maps the service request block (SRB) 


Maps the subsystem control record of areas saved at 
checkpoint time 


Maps request blocks 
Maps the task control block (CTCB) 
Maps the XCTL table 


This table lists the macros issued by VSAM that generate 
executable code. 


Macros That Generate Executable Code 


Macro 
ABEND 
ACQRANGE 
BLDVRP 
CATLG 


CLOSE 
CNVTAD 
DEBCHK 
DELETE 
DEQ 
DLVRP 
DOM 
ENDRE@ 


EN@ 
ERASE 
ESTAE 


EXCP 
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Description 

Abnormal termination (control program macro) 
Stage a range of data from a VSAM data set 
Builds a VSAM resource pool for shared resources 


Loads the address of the catalog parameter list 
CCTGPL) into register 1 and issues SVC 26 


VSAM CLOSE: Disconnects a user from a VSAM data set 
Convert key/RRN/RBA to volume serial and RBA 

Checks the validity of the DEB 

(Same as control program DELETE macro) 

(Same as control program DE@ macro) 

Deletes a VSAM resource pool for shared resources 
Deletes operator message (control program DOM macro) 


Terminates a VSAM record processing request (such as 
GET or PUT) 


(Same as control program EN@ macro) 
Deletes a VSAM record 


Specifies task asynchronous exit (control program 
macro) 


(Same as control program EXCP macro) 
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FREEMAIN 
GENCB 
GET 


GETIX 


GETMAIN 
GTRACE 


IDACALL 


IDACB1 


IDACB2 


IDAERMAC 


IDAEXITR 


IDAGMAIN 


IDAPATCH 
TDAP FMT 


IDARST14 
IDASVR14 


TECRES 
LOAD 
MNTACQ 
MODCB 
MODESET 
MRKBFR 
OBTAIN 
OPEN 
PGFIX 


PGFREE 
POINT 
POST 


Releases virtual storage obtained by a GETMAIN 
Generates a VSAM control block (ACB, EXLST, or RPL) 


Retrieves a record from a data set on a direct~access 
device 


Retrieves a control interval from the index of a 
key-~sequenced data set 


Obtains virtual storage for a temporary work area 


Calls the Generalized Trace Facility (GTF) to copy 
VSAM control blocks 


Transfers control from procedure A to procedure B and 
allows procedure B to return control to procedure A at 
the instruction following the IDACALL 
instruction-~expansion 


Transforms operands for control block manipulation 
macros (GENCB, MODCB, SHOWCB, and TESTCB) 


Scans keywords and generates code for control block 
manipulation macros 


Prints MNOTEs for control block manipulation macro 
user~programmer errors 


Transfers control from VSAM modules to a user's exit 
routine and allows the user exit routine to return 
control to the VSAM module at the instruction 
following the IDAEXITR instruction-expansion 
IDAEXITR issues DELETE, IDARST14, IDASVR14, and LOAD. 


Gets virtual storage for VSAM Open, Close, and End of 
Volume 


Generates maintenance space 


Gives control to End of Volume to preformat a control 
area 


Puts the return address in register 14 


ae register 14 in the placeholder (PLH) push-down 
is 


Transfers control to the resident routine 

(Same as control program LOAD macro) 

Mounts a volume and stages VSAM records into it 
Modifies a VSAM control block (ACB, EXLST, or RPL) 
(Same as control program MODESET macro) 

Marks a buffer in a VSAM resource pool 

(Same as control program OBTAIN macro) 

Connects a user's program to a VSAM data set 


"Fixes" a page of virtual storage so that it remains 
in real storage for a duration 


"Frees" a "fixed" page of virtual storage. 
Identifies a starting point in a VSAM data set 


(Same as control program POST macro) 
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PUT Writes a record into a VSAM data set 

PUTIX Writes a control interval in the index of a | 
kay-~sequenced data set 

RESERVE (Same as control program RESERVE macro) 

RETURN (Same as control program RETURN macro) 

SCHBFR saeco for a control interval in a VSAM resource 
poo 

S DUMP Schedules SVC dump routine (control program macro) 

SETFRR Sets up functional recovery routine Ccontrol program 
macro) 

SETLOCK Obtains or releases a lock (control program macro) 

SETRP Records recovery information Ccontrol program macro) 

SHOWCAT Displays information from a VSAM catalog 

SHOWCB Displays information from a VSAM control block CACB, 
EXLST» or RPL) 

SMFWTM Writes the SMF message into the SMF data set 

STARTIO Gives control to the I/O supervisor to start an [70 
operation 

SYNCH (Same as ISAM SYNCH macro) 

TERMRPL Releases owned resources of a terminated RPL and 
restarts deferred synchronous requests 

TESTAUTH Checks authorization of a calling module to perform 
certain functions 

TESTCB Tests information in a VSAM control block CACB, EXLST, 
or RPL) 

TIME Obtains the correct time from the system time-of-day 
clock 

VERIFY Gives control to record management to check the 
end-of-data indicators for checkpoint/restart or for 
Access Method Services VERIFY command 

WAIT (Same as control program WAIT macro) 

WRTBFR Writes buffers from a VSAM resource pool 

WTO Writes a message to the operator (no reply) 

XCTL Transfers control (control program XCTL macro) 
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Note: The use of these user macros is dascribed in VSAM 
: pay i : 


ACQRANGE 
BLDVRP 
CLOSE 


J 
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POINT 
PUT 
PUTIX 
SCHBFR 
SHOWCAT 
SHOWCB 


TESTCB 
WRTBFR 


GENERALIZED TRACE FACILITY 


Use the generalized trace facility (GTF) to obtain diagnostic 
information during the processing of VSAM OPEN and VSAM Record 
Management (R/M). If GTF is active, and either TRACE COPEN 
tracing) or TRACE= (R/M tracing) is specified as an operand on 
your DD statement, VSAM GTF records area written to the GTF data 
set. 


VSAM OPEN TRACE FACILITY 


The VSAM OPEN trace occurs when OPEN has completed opening the 
data set or when OPEN detects an error. It traces the VSAM 
control block structure and the OPEN work areas. If the VSAM 
OPEN trace occurred because of an error detected by OPEN, the 
VSAM control block structure may not be complete. 


To start the VSAM OPEN trace, specify TRACE on your DD 
statement. 
VSAM RECORD MANAGEMENT (R/M) TRACE FACILITY: GUIDE INFORMATION 
Use the VSAM record management (R/M) trace facility (referred to 
as R/M trace hereafter) to record VSAM R/M control blocks while 
VSAM is processing. The GTF must also be active bacause the R/M 
og trace function writes these control blocks to the GTF data set. 
Use the AMDPRDMP program to print the GTF trace records. 
When to Use the R/M Trace Facility 
Use the R/M trace to: 
e Capture data when a problem occurs. 
Problems include incorrect data in a data set, missing 
records, incorrect control block information, and program 
checks because of incorrect data and/or fields in VSAM R/M 
control blocks. 


® Capture VSAM R/M control blocks before an error code is 
passed back to the caller. 


VSAM R/M control blocks are captured before the calling 
program can: 


- Erase or overwrite the VSAM data. 
- Abnormally tarminate. 


- Close the data sat, freeing VSAM R/M control blocks. 


C 
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Starting the R/M Trace Function 
You must take the following steps to use trace: ) 
1. Activate GTF on your system. 


2. Place an AMP=('TRACE=(subparameters)') on the DD statement 
of the data set that you want to trace. 


When you start GTF, spacify USR or USRP with an AMO1 event 
identifier. If neither USR or USRP is specified, GTF ignores 
the data passed to it by trace. 


The AMP=(*TRACE=(subparameters)’) specifies to VSAM that you 
want to trace the control blocks associated with the data set 
identified by the DD statement. For complete syntax information 
on the AMP parameter, see the JCL manual, chapter 12, "Coding 
the DD Statement." 


The following are the valid subparameters for trace, including 
their brief descriptions. For more details on these 
subparameters, see "VSAM Record Management (R/M) Trace Facility: 
Reference Information” on page 444 


HOOK=(n,n,...) 


Specifies where in the VSAM R/M code tracing is to occur. 
The default is "HOOK=(1)." HOOK is an optional subparameter. 


ECODE=ANY | codenumber 

Limits tracing. When used, tracing occurs only if an error 

code is being returned to the caller. If "ANY" is 

specified, tracing is performed for any non-zero return 

code. If "codenumber"™ is specified, tracing is performed 

only for a specific error code. ECODE is an optional 

subparameter. : 
KEY=keydata | lowRBA-hi ghRBA 


Limits tracing. When used, tracing only occurs if the 
record key matches "keydata™, or if the record's RBA value 
is within the range of the "LowRBA" and "highRBA"” values. 
KEY is an optional subparameter. 


PARML=trace options 


Specifies which VSAM R/M data areas are to ba traced. PARM1 
is required when TRACE= is specified. 


PARM2=trace options 


Controls the processing of AIX, PATH, or UPGRADE data sets. 
PARM2 is an optional subparameter. 


EXAMPLE OF A DD STATEMENT REQUESTING TRACE: 


//KSDS01 DD DSN=VSAM.DATA.SET,DISP=SHR, 
44 


AMP=C'TRACE=CPARM1=F00203000010,ECODE=ANY' 
"HOOK=(€1,5),KEY=ABCDEF, PARM2=F123456789AB)") 





The TRACE= on this DD statement activates the R/M trace for 
"VSAM.DATA.SET". The R/M trace records are written out when: 


e An error CANY RPL error) is encountered as specified by 


ECODE=ANY. ) 


SY The racord being processed has a key which begins with the 
character string "ABCDEF"™ as specified by KEY=ABCDEF. 
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e Record management returns to the caller CHOOK 1) or returns 
( from a call to EQV CHOOK 5) as specified by HOOK=(1,5). 


When these conditions are met, R/M trace writes to GTF the 
following data as requested by PARML: ABP, ACB, AMB, AMBL, EDB, 
LPMB, PLH, and LIMIT. PARM2 has no effect on tracing because 
PARML, byte 5 bit 5 (trace AIX, PATH, or UPGRADE processing) was 
not specified. 


Adding Trace Pcints 


Several trace points are predefined into VSAM; each has a unique 
trace point ID. 


If one of these predefined trace points (specifiable by HOOK) is 
eee you can add your own trace point by providing the 
code below: 


BFFF 3078 | HOOK ICM 15,15,AMBTRACE IS TRACE ACTIVE? 


4780 NNNN BZ EXIT NQ, SKIP HOOK CODE 

58FO0 F000 L 15,0¢€15) LOAD TRACE ADDRESS 

O5EF BALR 14,15 GO TO TRACE 

002A DC X'O002A' ANY USER'S TRACE 
POINT ID 

47F0 XXXX EXIT B MAINLINE RETURN 


You must ensure that the following registers contain the 
indicated data: 


Register 2 Address of the PLH 
Register 3 Address of the AMB (data or index) 
~~ Register 15 Address of IDA019ST 


Failure to have these registers set could cause program checks 
and other unpredictable results. Register 0 is altered during 
the execution of trace routine. Care must be used in the 
selection of trace points, as well as in the selection of 
control blocks to be traced, because not all control blocks may 
be valid at a given time. 


Ending the R/M Trace Function 


The tracing of a data set terminates when that data set is 
closed. If you want to terminate the tracing prior to closing 
the data set, you must stop GTF. You can then restart GTF, but 
if you specify USR or USRP with "AMO1", R/M tracing will resume. 


Printing the R/M Trace Output 
The service aid AMDPRDMP is used to print the VSAM trace 
records. For details on AMDPRDMP, see Service Aids. You must 


use the AMDPRDMP's USR option on the EDIT statement as shown in 
the following example: 


C | 
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//DMPGTF JOB (XXXXXX,XX),PARKER,MSG LEVEL=(1,1), 
MSGCLASS=A,CLASS=A 
//STEP1 EXEC PGM=IKJEFT01,PARM="'AMDPRDMP' 
/ 


Other DD statements as required by AMDPRDMP 


//TRACE DD 
//SYSIN 


DSN=SYS1.TRACE,UNIT=293, 
VOL=SER=338003,DISP=SHR 


DD x 

EDIT DDNAME=TRACE,USR=AM01 
END 

7¥® 





In the example above, the TRACE DD statement defines the input 
trace data set. The EDIT control statement instructs AMDPRDMP to 
edit the trace records in the data set defined by the TRACE DD 
statement and to format all the VSAM trace records. 


VSAM RECORD MANAGEMENT (R/M) TRACE FACILITY: REFERENCE INFORMATION 


HOOK Subparameter 


The HOOK subparameter specifies trace points. A trace point 
indicates at what point in the VSAM R/M code tracing is to 
occur. The default trace point ID 1s 1 Cexit from VSAM). 


The following lists the predefined trace point IDs, their 


associated modules, and their functions: ) 
TRACE 

POINT : 

ID Module Description 

0000 IDAOI9RI Entry to VSAM 

0001 IDAOI9R1I Exit from VSAM 

0002 IDAMI9R3 Prior to SVC 121 for writes of CIs (no reads) 
0003 IDA019RZ After I/0, wait for CI reads and writes 
0004 IDA019SE Prior to call to EQV (SVC 55) 

0005 IDAODLIYSE After return from EOV 

0006 IDAO1LIRE Start of a CI split 

0007 IDAOD19RE After completion of a CI split 

0008 IDAODLIRS All I/O occurring during a CI split 

0009 IDA019RF Start of a CA split 

0010 IDA019RF After completion of a CA split 

0011 IDAO19R3 All I/0 occurring during a CA split 

0012 IDAOLYIORJ Prior to index CI split “rpAOL oR) entry) 
0013 IDAOD1IRI After call to IDAO19IRJ Cindex split) 

0014 IDAO19RU After completion of an upgrade request 

0015 IDAO1IRY Prior to read buffer, shared resources 

0016 IDAODLIRY Prior to write buffer, shared resources 
0017 IDAO19RP After return from JRNAD exit 

0018 IDA0199S7 Before SVC 109 call to update the VSI block 
0019 IDA019S7 Before control blocks are updated from VSI 
0020 Reserved 

thru 

0099 

0100 User trace points 

thru 

0255 
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ECODE Subparameter 


KEY Subparameter 


Notes: 


1. There is no limit to the number of trace points you can 
specify to trace. 


2. The HOOK subparameter must be enclosed in parentheses even 
if only one trace point ID is specified (for example, 
HOOK=(1)). 


The ECODE subparameter limits tracing. If ANY is specified, 
tracing occurs for any nonzero return code. If codenumber 
(specific error code) is specified, tracing occurs only if the 
RPLFDBK code matches the specified error code. 


If ECODE is not specified, the RPLFDBK code is not used to 
determine tf tracing is to occur. 


When an error code (codenumber) is specified, it must be a 
positive decimal number. For example, ECODE=12 causes tracing 
when one of the following situations occurs: 


° A buffer needs to be written. 


e An attempt was made to store a record out of ascending order 
sequence. 


e A physical read error has occurred for the sequence set of 
an index component. 


The three error situations are indicated by the RPLFDBK code of 
X'O0C' and the content of register 15 which is 0, 8, or 12, 
respectively. 


Note: If the user's LERAD or SYNAD exit routine resets the 
return code before VSAM returns to the caller, this exit routine 
may fail. Its failure depends on which trace point is active, 
and when the call to the user's exit routine is made. 


Sometimes it is desirable to trace only when a certain record or 
group of records is being processed. The KEY subparameter allows 
you to specify that tracing is to be done only if the key or RBA 
value in the record being processed matches the key or RBA value 
on the KEY subparameter. 


If KEY=keydata is specified, the "keydata”" may be any length up 

to 44 bytes. The keydata value does not need to be tha same 
length as the record's key length. The shorter key length is 

used to determine the amount of bytes to be compared; this 

oo you to use generic key values and specify a "range" of 
eys. 


If KEY=lowRBA-highRBA is specified, tracing occurs only if the 
RBA of the record being processed is within the range of 
"LowRBA™ and "highRBA™ values. 


PARML, byte 5 bit 5 determines the value of the KEY. If this bit 
is zero, the KEY field contains a key value; if this bit is 1, 
the KEY field contains an 8-byte "lowRBA" value, a dash, and an 
8-byte "highRBA™ value. 


Note: The KEY subparameter must not contain quotes, commas, or 
parentheses. 
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PARM1 Subparameter 


to be traced. It controls the tracing of the user-opened data 
sets. PARM1 is required if TRACE= is specified. If TRACE is 
specified without any subparameters, only VSAM Open/Close/EOV 
GTF records are built. 


The PARML subparameter specifies which VSAM R/M data areas are ) 


Each bit in the subparameter represents a trace option. If the 
bit is active (1), the corresponding control block is traced or, 
in the case of bits in byte 5, the corresponding condition is 
taken. The bits are as follows: 


Byte 0 Notes Description 
Lesa: eave 1 ABP — actual block processor 
eine es. aes 1 ACB — access method control block 
geilicge 18 iy ec AMB — access method block 
red bh Sactconths 1 AMBL — access method block list 
e.. * Meetene AMBXN — access method block extension 
oe eae AMDSB — access method data set 
statistics block 
a ie 1 ARDB — address range definition block 
wl 1 BIB: — base information block 
Byte 1 Notes Description 
| eee 2 BSPH — buffer subpool header 
Skate’. varenand 2 BUFC — buffer control block 
Swede: “erected 1 CMB — cluster management block 
oS eee CPA —- channel program area 
a. eae 1 CSL —- core save list 
ehes DIWA — data insert work area 
we Kegs 1 EDB — extent definition block 
ee | 1 HEB — header element block } 
Byte 2 Notes Description 
| re Nee oer ICWA — index create work area 
Bik cd sehdanth fe IICB — ISAM interface control block 
oy: eee IMWA — index modification work area 
Pe eee IOMB — I/O management block 
see vais I0SB — I/O supervisor block 
ae IXSPL — index search parameter list 
Pe ie 1 LPMB — logical-to-physical mapping 
block 
wae Gael 2 PLH — placeholder 
Byte 3 Notes Description 
Vie. aie eee RPL — request parameter list 
oe Seer eer SRA — sphere record area 
Mies |. Kebcsar UPT — upgrade table 
ee eee 1 VAT — valid AMBL table 
Riese oe ee 1 VMT — volume mount table 
er em VSI — VSAM shared information block 
Gliese we 1 IDAVSRT — VSRT vector table 
éa> wise k VSRT — VSAM shared resources table 
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Byte 4 Notes 
Diets: +s 
ore 
Redes seers 2 
eae ee 
Sere: eee 
he oe 
o - XM 
Byte 5 Notes 
Leese es 
oS ae 
sabes ate 4 
1. 48% 3 
0.. 
Ls 
et Wolize 
1 5 
~X 


PARM2 Subparameter 


Description 


WAX —- work area for path processing 
WSHD — working storage header 
Buffers 

User's search argument 

User's record 

Caller’s registers 

Reserved 


Description 


Don't trace data control blocks. 

Don't trace index control blocks. 
Trace all control blocks. 

Limit: one trace of control blocks. 
KEY=keydata (the KEY contains a key 
value) 

KEY=lLowRBA-highRBA Cthe KEY contains 
RBA values) 

Trace AIX, PATH, or UPGRADE processing 
CPARM2 required). 

br aa ale control blocks; trace if 
ad. 

Reserved 


PARMI controls the tracing of the user-opened data sets; PARM2 
controls the tracing of any VSAM-opened data sets. 


The PARM2 subparameter is used to control the tracing of: 


® AIX's base cluster when opened as @ path. 


° A base cluster's UPG Cupgrade) data set. 


PARM2 is used only if PARM1, byte 5 bit 5 (X"'04") is specified. 
It has the same options as PARM1's except for the last byte 
(byte 5) which is shown below: 


Byte 5 Notes 
1111 
a a ee, eee 

Pere te 6 

Pe | 7 
Notes: 


1. See note 3. 


2. See note 4. 


3. When "Limit: one trace of control blocks" (byte 5 bit 3) 


Description 


Same usage as in PARML. 
Reserved 

Trace all associated data sets. 
Trace UPGRADE control blocks. 


is 


specified, the control blocks indicated with note "1" are 
traced only on the first call to R/M trace. These control 


blocks, generally, 


opened. 


4. When "trace all control blocks" (byte 5 bit 2) 


do not change after the data set is 


the control blocks indicated with note "2" are traced even 


when the current request does not use them. 


If this bit is 


off, only those control blocks directly associated with the 
active request are traced. 
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Warning: Turning this bit on can cause a large amount of 
GTF data depending on the number of strings and buffers and 
the size of buffers. 


5.. This option causes R/M trace to validity~check the pointers 
in the VSAM R/M control blocks, and if a chaining error is 
detected, the trace is taken. 


6. When byte 5 bit 6 of PARM2 is off, only the data set being 
processed when R/M trace was called is traced. When this bit 
is on, R/M trace locates and traces data sets associated 
with the "calling" data set. 


e If the calling or associated data set was user~opened, 
PARM1L is used. 


° If the calling or associated data set was VSAM-opened, 
PARM2 is used. 


7. When byte 5 bit 7 of PARM2 is off, UPGRADE data sets are not 
traced unless the UPGRADE was the calling data set. When 
byte 5 bit 7 of PARM2 is on, R/M trace treats UPGRADES as 
associated data sets; they are traced when the calling data 
set is a path, AIX, or base. 


CATALOG COMMUNICATION AREA REGISTER SAVE AREA 


A catalog communication area (CCA) is built for every call to 
VSAM catalog management. The CCA contains a register save area 
CCCAREGS) that allows the diagnostician (program systems 
representative, customer engineer, systems engineer, or system 
programmer) to follow the flow of control from one catalog 
management external procedure to another, through each procedure 
called to process the request. 


The contents of registers 12, 13, and 14 are put into CCAREGS 
whenever a catalog management procedure is entered. The current 
value of register 13 is the address of the latest entry in 
CCAREGS. If an external catalog management procedure is entered 
eoce poeta catalog management procedure, three words are saved 
as follows: 


y The first word contains the contents of register Il2-—~the 
calling procedure's base address, 


e The second word contains the contents of register 13-—a 
potnter to the previous l2-byte entry in the register save 
area (CCAREGS), and 


e The third word contains the contents of register 14—the 
return address in the calling procedure. 


Immediately after registers 12, 13, and 14 are saved (Cat 
register 13 + 12 Cdacimal)), register 12 is updated to contain 
the called procedure's base address. Register 13's value is 
increased by 12, so that it points to the latest entry in 
CCAREGS. While a catalog management procedure is processing, 
register 11 contains a pointer to the beginning of the CCA 


Note that backward movement is not recorded in the trace table. 


For example, if procedure B returns to procedure A, the return 
is not shown in the register save area. 
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CATALOG COMMUNICATION AREA REGISTER SAVE AREA 


RETURN CODES 


A catalog communication area (CCA) is built for every call to 
VSAM catalog management. The CCA contains a register save area 
CCCAREGS) that allows the PSR Cprogramming systems 
representative) to follow the flow of control from one catalog 
management external procedure to another, through each procedure 
called to process the request. 


The contents of registers 12, 13, and 14 are put into CCAREGS 
whenever a catalog management procedure is entered. The current 
value of register 13 is the address of the latest entry in 
CCAREGS. If an external catalog management procedure is entered 
bere anoene® catalog management procedure, three words are saved 
as follows: 


e The first word contains the contents of register i2-——the 
calling procedure's base address, 


° The second word contains the contents of register 13-—a 
pointer to the previous l2-byte entry in the register sava 
area (CCAREGS), and 


® The third word contains the contents of ragister 14-——-the 
return address in the calling procedure. 


Immediately after registers 12, 13, and 14% are saved (at 
register 13 + 12 (€decimal)), register 12 is updated to contain 
the called procedure's base address. Register 13's value is 
increased by 12, so that it points to the latest entry in 
CCAREGS. While a catalog management procedure is processing, 
register ll contains a pointer to the beginning of the CCA. 


Note that backward movement is not recorded in the trace table. 
For example, if procedure B returns to procedure A, the return 
is not shown in the register save area. 


VSAM sets return codes in the RPL and the ACB. These codes are 
Paired with codes in register 15. Codes set in the RPL are 
listed and explained under "Return Codes from the 
Record-Management (Request) Macros." Those set in the ACB, which 
indicate open or close errors, are listed and explained under 
"Open and Close Return Codes." 


VSAM sets a pair of codes in registers 15 and 0 for the control 
block manipulation macros. These are listed and explained under 
"Control Block Manipulation Return Codes." 


RETURN CODES FROM THE RECORD-MANAGEMENT (REQUEST) MACROS 


LY26-3907~-1 


After a request macro or a CHECK or ENDRE@ macro is issued, 
register 15 contains a return code. 


After an asynchronous request for access to a data set, VSAM 
vn coces in register 15 whether the request was accepted, as 
ollows: 


Reg 15 Condition 

aco) Request was accepted. 

404) Request was not accepted because the request parameter 
list indicated by the request (RPL=address) was active 
for another request. 

After a synchronous request, or a CHECK or ENDREQ macro, 


register 15 indicates whether the request was completed 
successfully, as follows: 
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Condition 

Request completed successfully. 

Request was not accepted because the request parameter 
list indicated by the request (RPL=address) was active 
for another request. 


Logical error; specific error is indicated in the 
feedback field in the RPL. 


Physical error; specific error is indicated in the 
feedback field in the RPL. 


Paired with the 0, 8, and 12 indicators in register !15 are 
return codes in the feedback field of the request parameter 


list. 


The feedback return codes for the 0 indicator in register 15, 
which doesn't cause VSAM to exit to an exit routine, are: 


RPLFDBK 
Code 


0¢0) 
4(4) 


88) 


12¢C) 
16¢10) 


20¢14) 


24(18) 


28(1C) 


32(20) 


36 (24) 


40(28) 


Condition 
Request completed successfully. 


Request completed successfully. For retrieval, VSAM 
mounted another volume to locate the record; for 
storage, VSAM allocated additional space or mounted 
another volume. 


For GET requests, indicates that a duplicate key 
follows; for PUT requests, indicates that a duplicate 
key was created in an alternate index with the 
nonunique attribute. 


(Shared resources only.) <A buffer needs to be written. 


Control area split was required because a sequence set 
control interval had free space insufficient to contain 
the key to be inserted. 


Data set is not ona virtual DASD for MNTACQ/ACQRANGE 
request. Detected by IDAO19ZE. 


Buffer found but not modified: no buffer writes 
per formed. 


A CI split for the CI with the RBA acquired from 
RPLDDDD which was interrupted. The CI was read as 
nonupdate with address access. This warning condition 
indicates that duplicate data records may exist. 


Request deferred for a resource held by the terminated 
RPL is asynchronous and cannot be restarted by TERMRPL. 


Possible data set error condition was detected by 
TERMRPL : 


1. The request was abnormally terminated in the middle 
of its I/0 operation. 


2. One of the data/index BUFCs of the string contains 
data that needs to be written (BUFCMW=0ON) but it 
was invalidated by TERMRPL. 


Error in PLH data BUFC pointer was detected by TERMRPL. 


See the discussions below for the logical-error and 
physical-error return codes. 
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Function Codes for Logical and Physical Errors 


When a logical or physical error occurs during processing that 

involves alternate indexes, VSAM provides a code in the RPLCMPON 

field that indicates whether the base cluster, its alternate 

index, or its upgrade set was being processed and whether 

ra Ne was satisfactory or may have been incorrect because of 
e error: 


Code What Was Being Processed Status of Upgrading 


0¢0) Base cluster Satisfactory 
1¢1) Base cluster May be incorrect 
2(2) Alternate index Satisfactory 
3¢3) Alternate index May be incorrect 
4(4) Upgrade set Satisfactory 
5(5) Upgrade set May be incorrect 


Logical-Error Return Codes 


When a logical~error-analysis exit routine (LERAD) is provided, 
it gets control for logical errors, and register 15 doesn't 
contain 8, but contains the entry address of the LERAD routine. 


Figure 64 gives the contents of the registers when VSAM exits to 
the LERAD routine. 


If a logical error occurs and a LERAD exit routine isn't 
provided Cor the LERAD exit is inactive), VSAM returns control 
to the processing program following the last executed 
instruction. Register 15 indicates a logical error (8), and the 
feedback field in the request parameter list contains a code 
identifying the error. Register 1 points to the request 
parameter list. 


Reg Contents 
0 Unpredictable. 


1 Address of the request parameter list that contains the 
feedback field the routine should examine. The register 
teat contain this address if the exit routine returns to 

S e 


2-13 Same as when the request macro was issued. Register 13, 
by convention, contains the address of the processing 
program's 72-byte save area, which may not be used as a 
save area by the LERAD routine if the routine returns 
control to VSAM. 


14 Return address to VSAM. 


15 Entry address to the LERAD routine. The register doesn't 
contain the logical~error indicator. 


Figure 64. Contents of Registers When a LERAD Routine Gets 
Control 
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Figure 65 gives the logical-error return codes in the feedback 
field and explains what each means. 


J 


RPLFDBK ; 
Code Symbol Condition 
4(4) RPLEODR End of data set encountered (during sequential retrieval). 
Either no EODAD routine is provided, or one is provided and it 
returned to VSAM and the processing program issued another GET. 
Detected by: IDA019RA, IDA019RD, IDAOLORR, IDAOLIRY, 
IDAO019R2Z2, IDA019R4, IDA019R5, IDAOQ1IRS 
8(8) RPLDUP Attempt was made to store a record with a duplicate key. 
Detected by: IDAO1LIRA, IDAO1LORQ, IDAODLORX, IDAOLIRG, 
IDAO1ISE 
12¢C) RPLSEQCK Attempt was made to store a record out of ascending key 


sequence; record may also have a duplicate key. 


Detected by: IDAO19RA, IDAOLIORR, IDAO19RX, IDAOLIIRG, 
IDAO19SE 


16(10) RPLNOREC Record not found. 


Detected by: IDA019RA, IDA019RR, IDAO19RU, IDAOLIRX, 
IDAODLORY, IDAOD19R4 


20¢€14) RPLEXCL Record already held in exclusive control by another requester. 


Detected by: IDAOD19RF, IDAO019RQ, IDAO19RR, IDAODIOIRT, 
IDAO19SV, IDAO1ORX, IDAOLORY, IDAOD1IR2, 


IDAO019R4, IDADLIRS } 


24618) RPLNOMNT Record resides on a volume that can't be mounted. 


Detected by: IDAO19RW, IDAO1ORY, IDAO019R2, IDAN19SE, 
IDA01951 


28(1C) RPLNOEXT Data set cannot be extended because VSAM can't allocate 
additional direct~access storage space. Either there isn't 
anough space left in the data space for the 
secondary-~allocation request or an attempt was made to increase 
the size of a data set by splitting the control area Chigh used 
RBA change) during processing with SHROPT=4% and DISP=SHR. 


Detected by: IDAO19RE, IDAO1LORF, IDAO019ORQ, IDAOL1IRX, 
IDA019R4, IDAO19R8, IDAOLISE 
32(20) RPLINRBA An RBA was specified that doesn't give the address of any data 


record in the data set. 


Detected by: IDA0N19RA, IDAODI9RJ, IDAO19RG, IDAD19R8, 
IDA0195SG 


36(249) RPLNOKR Key ranges were specified for the data set when it was defined, 
pet ne penge was specified that includes the record to be 
nserted. 


Detected by: IDA019RM, IDA019RX 
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RPLFDBK ; 
Code Symbol Condition 
40¢28) RPLNOVRT Insufficient virtual storage in the address space to complete 


the request. Or there is insufficient storage available to 
dynamically add another string. 


Detected by: IDA0N19RG, IDAO19IRU, IDAOD19RX, IDAON19SG, 
IDAO19SH, IDAOD19SL, IGX00006 


44(2C) RPLINBUF Work area not large enough for the data record (GET with 
OPTCD=MVE). 


Detected by: IDAO1ORR, IDAOLIRT, IDAODLIORU, IDADIIRX, 
IDAOD1ORY, IDADLIIRG, IDADLIIRS 


48°30) RPLINTRM Invalid options, data set attributes, or processing conditions 
specified for TERMRPL request: 


e CNV processing 

e The specified RPL is asynchronous 
° Chained RPL'‘s 

e PATH processing 

e Shared resources (LSR/GSR) 


° Create mode 
° RRDS 
e Data set contains spanned records 


e User not in Key 0 and supervisor state 
e EOV in process (Secondary allocation) 
Detected by: IDA019SN 

52034) RPLTERM The previous request was TERMRPL. 
Detected by: IDA019SN 

64°40) RPLNOPLH As many requests are active as the number specified in the 
STRNO parameter of the ACB macro; therefore, another request 
cannot be activated. Or there is insufficient storage 
available to dynamically add another string. 


Detected by: IDA019RU, IDAODIIRX, IDAOI1ORI, IDAON1L9ISI, 
IDA0200B 


68044) RPLINACC Attempt was made to use a type of processing Coutput or 
control~interval processing) that was not specified when the 
data set was opened. 

Detected by: IDAOD19RQ, IDAON19R4, IDAOLIRS 

72°48) RPLINKEY A keyed request for access was made to an entry-sequenced data 
set or a GETIX or PUTIX was issued to an antry~sequenced or 
relative record data set. 


Detected by: IDAO019R1, IDAOLIRS 
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RPLFDBK 
Code 


76(04C) 


80¢50) 


84(054) 


88(58) 


92(05C) 


96(60) 


100¢664) 


104(68) 


Symbol 
RPLINADR 


RPLERSER 


RPLINLOC 


RPLNOPTR 


RPLINUPD 


RPLKEYCH 


RPLDLCER 


RPLINVP 
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Condition 
An addressed or control~interval PUT was issued to add a record J 


to 3s key-~sequenced data set, or a control-interval PUT was 
issued to a relative record data sat. 


Detected by: IDA019R1, IDA019R8 


An ERASE request was issued for access to an entry-~sequenced 
data set. 


Detected by: IDAOLORL, IDAODLORX, IDADLIRS 


OPTCD=LOC was specified for a PUT request or in a request 
parameter list in a chain of request parameter lists. 


Detected by: IDA019RQ, IDA019R1, IDAOLORG, IDAO19RS 

A sequential GET or PUT request was issued without VSAM having 
been positioned for it, or a change was made from addressed 
access to keyed access without VSAM having been positioned for 
keyed sequential retrieval, or an illegal switch between 
forward and backward processing was attempted. 


Detected by: IDAO019RQ, IDAO19ORR, IDAOLORG, IDAD1ORS 
A PUT for update or an ERASE was issued without a previous GET 
for update, or a PUTIX was issued without a previous GETIX. 


Detected by: IDAO19RQ, IDADLIRX, IDAO19R4, IDADLIRS 


Attempt was made to change a key during an update. 
Detected by: IDAOD1LORL, IDA019RX ) 


Attempt was made to change the length of a record during an 
addressed update. 


Detected by: IDAODI9RL, IDAD19RQ 


The RPL options are either invalid or conflicting in one of the 
following ways: 


® SKP was specified and either KEY wasn't specified or BWD 
was specified 


e BWD was specified for CNV processing 

@ FWD and LRD were specified 

e Neither ADR, CNV, nor KEY was specified in the RPL 

e WRTBFR, MRKBFR, or SCHBFR was issued, but either TRANSID 
he deal ae than 31 or a shared-resources option wasn't 


e ICI processing was specified, but a request other than a 
GET or a PUT was issued 


Datacted by: IDAOD19SRA, IDAOD1LIRR, IDADIIRX, IDAOIORY, 
IDAOLORI, IDAOD19R4, IDAO19RS, IDAOL9IS1I 


Figure 65 (Part 3 of 6). Logical-Error Return Codes in the RPL Feedback Field 
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Figure 65 (Part 4 of 6). 
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RPLFDBK — 
Code Symbol Condition 
108(6C) RPLINLen RECLen specified was larger than the maximum allowed, equal to 
0, smaller than the sum of the length and the displacement of 
the key field, or not equal to record (slot) length specified 
for a relative record data set. 
Detected by: IDA01L9SRL, IDAO1L9RQ, IDAO1ORU, IDAO1LIRG, 
IDA019R8 
112(70) RPLKEYLC KEYLen specified was too large or equal to 0. 
Detected by: IDAO1SRI 
116(74) RPLINLRQ A GET, POINT, ERASE, direct PUT, skip sequential PUT, or PUT 
with OPTCD=UPD not permitted during initial data-set loading 
(that is, for storing records in the data set the first time 
it's opened). 
Detected by: IDA019RO, IDAO1IRR, IDAO1LIORX, IDAOLORI, 
IDA019R4, IDAO1LIRS 
120¢€78) RPLINTCB Current jobstep TCB is not correct one. 
Detected by: IDAO01LORF, IDAOLIRG, IDAOLIORP, IDAO1IRU, 
IDA019R1, IDAO1ISE 
124(7C) RPLUEXCL A request was canceled from a user JRNAD exit. 
Detected by: IDA01LIYRF, IDAOLORP, IDA019RQ, IDAOLORR, 
IDAOD1LORT, IDAOLORV, IDAO1ORW, IDAOLORY, 
IDA019R4, IDAODLIRS 
132(84%) RPLSRLOC An attempt was made in locate mode to retrieve a spanned 
record. 
Detected by: IDAO19ORT, IDAO019RX 
136(83) RPLARSRK An addressed GET was issued for a spanned record ina 
key-sequenced data set. 
Detected by: IDA01IRT 
140(8C) RPLSRISG Inconsistent spanned-record segments. 
Detected by: IDA0N19IR4 
144¢€90) RPLNBRCD Invalid pointer in an alternate index (no associated base 
record). 
Detected by: IDA019RX 
- 148094) RPLNXFTR The maximum number of pointers in the alternate index has been 
exceeded. 
Detected by: IDA019RU 
152098 > RPLNOBFR (Shared resources only.) Not enough buffers are available to 


process the request. 


Detected by: IDAO1LSRY 


Logical-Error Return Codes in the RPL Feedback Field 


1974,1985 Diagnostic Aids 


RPLFDBK 
Code 


156(9C) 


160CA0) 


164(A4) 


168(A8) 


172CAC) 


176(B0) 


Symbol 
RPLINCNV 


RPLBMWER 


RPLINMSS 


RPLPLERR 


RPLACQER 


RPLSTGER 
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Condition 
An invalid control interval was detected during keyed | } 
processing. The possible invalid conditions are: 


1. A key is not greater than the previous key. 

2 A key is not in the current control interval. 
3 A spanned record RDF is encountered. 

4. A freespace pointer is invalid. 
5 


The sumer of records does not match a group RDF record 
count. 


Detected by: IDAOD19RA, IDAO1ORE, IDAO19RJ, IDAOIORL, 
IDAO019RM, IDAO019RV, IDAO19R4, IDA019S6 


A request was issued to invalidate a modified buffer. 

Detected by: IDA019RY 

Invalid options specified for CNVTAD/MNTACQ/ACQRANGE request: 

° Generic key (GEN) 

° Create mode 

° Path processing 

° User buffers CUBF) with LSR/GSR 

e KSDS but not key processing (KEY) 

e ESDS but not address processing CADR) 2 
e RRDS but not key processing (KEY) | 
e IMBED data set with only one level of index. 

Detected by: IDA019R1, IDA019S5SG, IDA019SH 


User parameter list errors detected for CNVTAD/MNTACQ/ACQRANGE 
raquest: 


@ No user parameter list is specified CRPLARG=0) 
e Argument count = zero for CNVTAD/MNTACQ request 


e Ending argument is less than starting argument for ACQRANGE 
request 


e Parameter list is not on word boundary. 
Detected by: IDA019R1, IDA019SH 


ACQUIRE immediate errors returned by SVC 126 for 
MNTACQ/ACQRANGE request. 


Datected by: IDAO19SL, IDA0192E 


Staging failure for MNTACQ/ACQRANGE request. (MSS hardware 
errors.) 


Datected by: IDA019SM 


Figure 65 (Part 5 of 6). -\Logical~Error Return Codes in the RPL Feedback Field 
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RPLFDBK 


Code Symbol 
180¢B4) RPLVOLER 
184(B8) RPLCTGER 
188(BC) RPLNO241 
192¢€C0) RPLIRRNO 
196(C4) RPLRRADR 
200¢(C8) RPLPAACI 
204(CC) RPLPUTBK 
. 208¢D03 RPLINVEQ 
212¢€D4) RPLNOSPL 
224(E0) RPLMOIB 
228( E43 RPLINVMD 
232¢(E8) RPLUPERR 
236CEC) RPLINVSI 
240(F0) RPLUSTAT 
Figure 65 (Part 6 of 6). 
LY26-3907-1 
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Condition 


RBA/Volume error for MNTACQ/ACQRANGE request. (Required volume 
not mounted or specified RBACs) not on mounted volume. ) 


Detected by: IDAOI9SL, IDAODLSZE 
Catalog errors returned from SVC 26 for CNVTAD request. 
Datected by: IDA019SG, IDAO1L9SL, IGX00006 


Storage in subpool 241 is not available for MNTACQ or ACQRANGE 
request. 


Detectad by: IDA019SL, IDA0192E 

Invalid relative record number. 

Detected by: IDA019RQ, IDAOI9RR, IDA019SG, IDA019SH 

An addressed request was issued to a relative record data set. 
Datected by: IDA019R1 


poueoaee or control-interval access was attempted by way of a 
path. 


Datected by: IDA019RX 

PUT-insert requests are not allowed in backward mode. 
Detected by: IDAO19RQ, IDAD19R4 

Invalid ENDRE@ request. 

Detected by: IDAOI9RP, IDA0N19R1, IDA019SM 

Unable to split index. 

Detected by: IDAOQ19RI, IDAOD1IRJ 

A MRKBFR request was issued for an invalid buffer. 
Detected by: IDA0L9RY 

A cross~-memory caller is not in supervisor state, in SRB, in 
cross-memory mode, or callers of RPL does not specify SYN 
processing. 

Detected by: IDAO19RY, IDAO19R1, IDA019SV 


Cross~memory mode caller did not post the ECB in thea UPAD exit 
routine. 


Detected by: IDAO1LIORZ, IDA019SE, IDA019SV, IDA019S2 

Validity check error from SVC 109 for share options 3 or 4. 
Dataected by: IDA0N19SV, IDA0195S7 

Buffer pool status is unknown. The buffer use chain may be 
changing or a buffer is being modified or invalidated. Raissue 
the request. 


Detected by: IDAOLORY, IDA019SN 
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Physical-Error Return Codes 


When a physical-error-analysis exit routine (SYNAD) is provided, 
it gets control for physical errors, and register 15 doesn't 
contain 12, but contains the entry address of the SYNAD routine. 


Figure 66 gives the contents of the registers when VSAM exits to 
the SYNAD routine. 


Reg Contents 
0 Unpredictable. 


1 Address of the request parameter list that contains a 
feedback return code and the address of a message area, if 
any. If a request macro was issued, the RPL is the one 
pointed to by the request macro; if a CLOSE macro was 
issued, the RPL was built by VSAM to process the close 
request. Register 1 must contain this address if the exit 
routine returns to VSAM. 


2-13 Same as when the request macro or CLOSE macro was issued. 
Register 13, by convention, contains the address of the 
processing program's 72-byte save area, Which may not be 
used by the SYNAD routine if it returns control to VSAM. 


14 Return address to VSAM. 


15 Entry address to the SYNAD routine. The register doesn't 
contain the physical-error indicator. 


Figure 66. Contents of Registers When a SYNAD Routine Gets 
Control 


J 
If a physical error occurs and a SYNAD exit routine isn't 
provided Cor the SYNAD exit is inactive), VSAM returns control 
to the processing program following the last executable 
instruction. Register 15 indicates a physical error (12), and 
the feedback field in the request parameter list contains a code 


identifying the error. Register 1 points to the request 
parameter list. 


Figure 67 gives the physical-error return codes in the feedback 
field and explains what each indicates. If the user provided a 
message area, it contains a physical-error message with more 
details about the error. 


RPLFDBK — 

Code Symbol Condition 

4(04) RPLEDERD Read error occurred for a data component. 

8(8) RPLRDERI Read error occurred for the index set of 
an index component. 

12¢0C)S RPLRDERS Read error occurred for the sequence set 
of an index component. 

16¢€10) RPLWTERD Write error occurred for a data component. 


Figure 67 (Part 1 of 2). Physical-Error Return Codes in the RPL 
Feadback Field from a Request Macro 
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RPLFDBK 
Code Symbol condition 
( 20614) RPLWTERI Write error occurred for the index set of 
an index component. 
24(€18) RPLWTERS Write error occurred for the sequence seat 


of an index component. 

All physical errors are detected by 
IDAO019R5 from I/0 Management abnormal-end 
appandage, IDA121A4. 


Figure 67 (Part 2 of 2). Physical-Error Return Codes in the RPL 
Feedback Field from a Request Macro 


c 
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Field 


Message 
Length 


Message 
Length-4 


Address of 
I/0 Buffer 


The rest of the message is 


Date 


Time 


RBA 


Data-Set 
Type 


Volume Serial 
Number 


Job Name 


Step Name 


Unit 


Device Type 


Figure 68 (Part 1 of 2). 


Bytes 


12 
17 
18 


26 
27 


35 
36 


42 
43 


49 
50 
58 
59 


67 
68 


71 
72 


74 
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Figure 68 gives the format of a physical-error message. The 
format and some of the contents of the message are purposely 
similar to the format and contents of the SYNADAF message, which 


is described in a Admin ra n: Macr ruction 
ferenc 
Length Discussion 

1 2 Binary value of 128 

3 2 Unused (0) 

5 2 Binary value of 124 
Cprovided for compatibility with SYNADAF 
message) 

7 2 Unused (0) 

11 4 The I/0 buffer associated with the data 


in relation to which the error occurred 


in printable format: 


16 5 YYDDD Cyear and day) 
1 Comma (,) 

25 8 HHMMSSTH Chour, minute, second, and 

tenths and hundredths of a second) 
1 Comma (,) 
34 8 Relative byte address of the racord in 
relation to which tha error occurred. 
1 Comma (,) 
41 6 "DATA™ or "INDEX" 
1 Comma (,) 
48 6 Volume serial number of the volume in 
relation to which the error occurred 
1 Comma (,) 
57 8 Name of the job in which error occurred 
1 Comma (, ) 

66 8 Name of the job step in which error 

occurred 
1 Comma (,) 

70 3 The unit, CUU Cchannel and unit), in 

relation to which the error occurred 
1 Comma (,) 

73 2 Tha type of device in relation to which 
the error occurred Calways DA for direct 
access) 

1 Comma (,) 


Format of Physical-Error Messages 
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Field Bytes Length Discussion 


ddname 75 82 8 The ddname of the DD statement defining; 
the data set in relation to which the 
error occurred 


83 1 Comma (,) 
Channel 84 8&9 6 Thea channel command that occasioned the 
Command ae in the first two bytes, followed by 
90 1 Comma (,2 
Message 91 105 15 Messages are divided according to ECB 
condition codes: 
'4] 


"UNIT EXCEPTION" 
"PROGRAM CHECK" 
"PROTECTION CHK" 
"CHAN DATA CHK 
"CHAN CTRL CHK" 
"INTFCE CTRL CHK® 
"CHAINING CHK" 
"UNIT CHECK" 


t fe) it chec a e 
ace fa) fe) e Ow] 


"CMD REJECT" 
"INT REQ" 

"BUS OUT CK" 
"EQP CHECK" 
"DATA CHECK" 
"OVER RUN" 
"TRACK COND CK" 
"SEEK CHECK" 
"COUNT DATA CHK" 
"TRACK OVERRUN" 
"CYLINDER END" 
“INVALID SEQ" 
"NO RECORD FOUND" 
"FILE PROTECT" 
"MISSING A.M." 
"OVERFL INCP"™ 


X'48'——-"PURGED REQUEST" 
X'4F'—-"R.HA.RO. ERROR" 


For any other ECB completion 
code——"UNKNOWN COND."* 


106 1 Comma (,) 
Physical 107 120 14 BBCCHHR (bin, cylinder, head, and 
Direct-Access record) 
Address 
121 1 Comma (,) 
Access Method 122 127 6 "YSAM" 


Figure 68 (Part 2 of 2). Format of Physical-Error Messages 
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OPEN AND CLOSE RETURN CODES 


RPLFDEBK 
Code 


0¢€0) 


4(4) 


76040) 


88(58) 


92(50) 


96(60) 


Symbol 
OPERROO0 


OPERRO04 


OPERRO76 


OPERRO8&S 


OPERRO92 


OPERRO 96 


When a processing program receives control after it has issued 
an OPEN or CLOSE macro, register 15 indicates whether all of the 
data sets were opened or closed successfully: 


Reg 15 Condition 
0¢0) All data sets wera opened or closed successfully. 


404) Open: all data sets were opened successfully, but one or 
more warning messages were issued (CACBERFLG codes less 
than X'80'). Close: at least one data set (VSAM or 
nonVSAM) was not closed successfully. 


8¢(8) Open: at least one data set (VSAM or non-VSAM) was not 
opened successfully; if there was an error for an ACB, 
it pa rastored to the contents it had before OPEN was 
issued. 


12¢C) Open: at least one data set (VSAM or non-VSAM) was not 
opened successfully; if there was an error for an ACB, 
it was not restored to the contents it had before OPEN 
was issued (and the data set cannot be opened without 
the ACB's being restored). 


The following table describes the error codes set and defined by 
the IDAERRCD macro in the ACBERFLG field. Each ACBERFLG code 
corresponds to the error code (PPCODE) defined by the IDAPPCDE 
macro. The PPCODE can be used as an indax into an array of error 
codes to reference the ACBERFLG code. The IDAERMAP macro 
defines the array that maps the error codes. 


Condition 


When register 15 contains 0: <All data sets were opened or 
closed successfully. 


When register 15 contains 8: Either VSAM is processing the 
ACB for some other request, 


Or DDNAME was not specified in the ACB 

Warning message: The ACB is already opened (and the user 
issued OPEN), or the ACB is already closed (Cand the user 
issued CLOSE or temporary CLOSE). 


Warning message: Open encountered an interrupt racognition 
condition. 


Detected by: IDA0192B 

Warning message: No additional space maybe allocated to this 
VSAM data set because a possibly critical abend or error 
occurred in previous space allocation attempt. 

Detected by: IDA0192B, IDAOQ557A 


Warning message: Inconsistent use of CBUF processing. 
Sharing options differ between index and data components. 


Detected by: IDA0192B 
Warning message: An unusable data set was opened for input. 


Detected by: IDA0192B 
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RPLFDBK 
coda Symbol Condition 


Cc 100(64) OPERR100 Warning massage: Open encountered an empty alternate index 
that is part of an upgrade set. 


Detected by: IDA0192B 


104(68) OPERR104 Warning message: The timestamp for the volume does not match 
the timestamp in the catalog record for the data sat. (This 
may mean the cluster existing on the volume(s) is not 
accurately dascribed by its catalog record.) 


Detected by: IDA0192A, IDA0192F, IDA0192V 

108¢6C) OPERR108 Warning message: The timestamp for the index is less than 
the timestamp for the data sat. (This could occur if the 
data sat was updated without the index being opan.) 
Detacted by: IDA0192B 

116¢€74) OPERR116 Warning message: The last request to close this data sat was 
not completed successfully, and either Open's implicit 
verify was unsuccessful or the user specified that Open's 
implicit verify should not be executed. 
Datected by: IDA0192B, IDA0192F, IDA0192I, IDAOQA05B 

118(€76) OPERR118 Warning message: The last request to close this data set was 
not completed successfully, but Open's implicit verify was 
successfully executed. 
Detected by: IDA0192B, IDA0192F 

128(80) OPERR128 DDNAME not found in TIOT. 


Detacted by: ICYMMSRV, IDA0192A, IDA0192B, IDAOCOGA, 
nd IDAOAO5B, IDAOCO6C 


129(81) OPERR129 CLOSE TYPE=T was issued against a VSAM data set that was 
opened using the media manager. This is not supported. 


Detected by: IDA0231T 
130¢82) OPERR130 An error was detected by media manager services. 
Datected by: ICYMMSRV 
132(84) OPERR132 ie error was detected while the system was reading the 


Detected by: IDA0192C, IDA0192F, IDA0200V 


136(88) OPERR136 Not enough storage was avajlable for work areas, buffers, or 
control blocks. 


Detected by: IDA0192A, IDA0192B, IDA0192C, IDA0192F, 
IDAOL92W, IDA0192Y, IDA0192Z, IDAOZOOB, 
IDAG2Z200T, IDA0231B, IDAO0231T 


140¢€8C) OPERR140 The catalog indicates that the data set has an invalid 
physical record size. 


Detected by: IDA0192Z 


C 
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RPLFDBK 
Code 


144090) 


145(91) 


148094) 


152(98) 


160C€A0) 


164CA4) 


168(A8) 


172CAC) 


176(B0) 


180(B4) 


184(B8) 
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Symbol 
OPERR144 


OPERR145 


OPERR148 


OPERR152 


OPERR160 


OPERR164 


OPERR168 


OPERR172 


OPERR176 


OPERR180 


OPERR184 
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Condition 


An I/O error occurred while a catalog record was being read 
or reat A return code was set by a catalog management 
routine. 


Detected by: IDA0192C, IDA0557A, IDA0557B 
I/O error reading or writing VVRs. 
Detected by: IDA0192B, IDA0557X, IDA0200B 


The catalog antry for the data set being opened or closed 
was not found or an unidentified error occurred while VSAM 
was searching the catalog. 


Detected by: IDA0192C, IDA0557A, IDA0557B 


The data seat being opened is protected by a password, and 
the VSAM Open routine was unable to validate the password or 
a program is attempting to open a catalog as a 
ata seat. 


Detected by: IDA0192A, IDA0192C 


The buffer space specified was not consistant with the 
buffer requirements of the data set; or the ACB indicated 
keyed access, but the data set is not a key~sequenced data 
set; or the device type specified in the DD statement is not 
consistent with the device type indicated in the catalog 
entry for tha data set; or user buffering is specified in 
the ACB"'s MACRF field and control~interval processing should 
be specified, but is not. 


Detected by: IDA0192A, IDA0192B, IDA0192C, IDA0192Z 


The system detected an I/0 error while reading the volume 
label and format~4 DSCB. 


Detected by: IDA0N192F, IDA0192V 

The Open routine was unable to gat the resource the system 
requested for the data set being opened. The resource was 
being used by another task in the system. 

Detected by: IDA0192B, IDA0557A, IDA0557B 


Unable to mount volume for space allocation. UCB maximum 
count is at maximum number ~ 127. 


Detected by: IDA0192V, IDA0557A, IDA0557B 


The Opan routine was unable to fix in real storage the 
accass~method control blocks for tha data set being opened. 


Datacted by: IDA0192F, IDA0557A, IDA05578B 


The requested master or user catalog does not exist or is 
not open. 


Detactad by: IDA0192C, IDA0557A, IDA0557B 
An I70 error occurred during I/0 processing. 


Detected by: IDA0192B, IDA0200B, IDA0200T, IDA0231B, 
IDA0231T 
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RPLFDBK 
Code 


188(BC) 


192¢C0) 


193(C1) 


196(C4) 


200(C8) 


204(CC) 


205(CD) 


208(D0) 
212(D4) 


216(D8) 


220(DC) 


224(E0) 


228(E4) 


LY26-3907-1 


Symbol 
OPERR188 


OPERR192 


OPERR193 


OPERR196 


OPERR200 


OPERR204 


OPERR205 


OPERR208 
OPERR2Z12 


OPERR216 


OPERR220 


OPERR224 


OPERR228 


© Copyright IBM Corp. 1974,1985 


Condition 


The data set indicated by the ACB is not the type that may 
be specified by an ACB. 


Detected by: IDA0192A, IDA0192B, IDA0192C, IDA0192Y, 
IDA0192Z, IDAO0Z200B, IDAOZ00T, IDAO02Z31B, 
IDAO023i1T, IDA0557A, IDAOCO6C 

An unusable data set was opened for output. 

Detected by: IDA0192B 

Open for output and the IRF indicator is on. 

Detected by: IDA0192B, IDA0557X 

Access to data was requested by way of an empty path. 


Detected by: IDA0192B 


The Format-4 DSCB indicates the volume is unusable, so the 
data set cannot be opened. 


Detected by: IDA0192F, IDA0192V 


The ACB MACRF specified GSR, but the program that issued 
OPEN isn't in supervisor state with protection kay 0 or 7. 


Detected by: IDA0192A 


ACBCATX or VVDs and caller was not in supervisor state, 
system key or APF authorized. 


Detected by: IDA0N192A 
ACB indicates GSR and system is VSI. 


The ACB MACRF specified GSR or LSR, but the data set 
requires create processing. 


Detected by: IDA0192B 

The ACB MACRF specified GSR or LSR, but tha key length of 
the data set exceeds the maximum key length specified in 
BLDVRP. 

Detected by: IDA0192B 

The ACB MACRF specified GSR or LSR, but the data sat's 
control interval size exceeds tha siza of the largest buffer 
specified in BLDVRP. 

Detected by: IDA0192Z 


The ACB MACRF specified ICI, but the data seat raquires 
create processing. 


Datected by! IDA0192B 


The ACB MACRF specified GSR or LSR, but the VSAM shared 
resource table doesn't exist. 


Detected by: IDA0192A 
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RPLFDBK 
Code Symbol Condition 


232(E8) OPERR232 Reset was specified for a nonreusable data set, but the data J 
sat is empty. 


Datected by: IDA0192C 


236( EC) OPERR236 A permanent staging error (ACQUIRE) or dastaging error 
(RELINQUISH) occurred in the Mass Storage System. 


Detected by: IDA0192D 


240(FO) OPERR240 Format-4 DSCB and catalog timestamp verification failed 
during volume mounting for output processing. 


Datected by: IDA0192F 


2440 F4) OPERR244 The volume that contains the catalog recovery area wasn't 
mounted and verified for output processing. 


Detected by: IDA0192F 
248(F8) OPERR248 Reserved for DOS 
252CFC) OPERR252 Reserved for DOS 


END-OF-VOLUME RETURN CODES 


These codes are returned by End of Volume to modules that call 
End of Volume. For Open and Close, those that indicate an error 
result in an ACBERFLG code’s being returned to the user. 


Reg 15 Condition wal? 
0¢0) Successful. 
4(4) The requested volume could not be mounted. 
&8(8) The requested amount of space could not be allocated. 
12¢C) I/0 operations were in progress When End of Volume was 
requested. 

16¢10) The catalog could not be updated. 
All End-of-Volume errors are datected by IDA0557A. 

CONTROL BLOCK MANIPULATION RETURN CODES 
When the control block manipulation routine returns to the 
caller after successful completion, register 15 contains 0. If 
the request is GENCB, register 0 contains the total langth of 
the area that contains the control block(s). Register Il 
contains the address of the area. 
When the control block manipulation routine returns to the 
caller with a nonzero value in register 15, an error occurred. 
If the request is TESTCB and the caller supplied a ERET keyword, 
return is to the location specified by the ERET keyword. 
Otherwise, the control block manipulation routine returns 
control to the point of invocation, via the return address in 
register 14. 
Register 15 contains a return code: 
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Reg 15 Condition 
[ 0¢0) Successful completion. 


404) An error has been detected. The error coda in ragister 
0 indicates the type of error. 


8(8) Invalid use of the execute form of this macro. Since 
the return code is set by the macro expansion and not by 
the control block manipulation routine, the register 0 
contents do not indicate an error code. 


Register 0 contains an error code: 


Applicable 

Code Macros Condition 

1¢1) G,M,S,T The function type is invalid. 

2¢2) G,M,S,T The control-block typa is invalid. 

3(3) G,M,S,T The keyword type is invalid. 

404) M,S,T The control block to be processed 
isn't of the type specified. 

5(€5) S,T The ACB to be processed is closad-it 
must be open. 

6(6) S,T The cluster whose index component was 


to be processed isn't key-~sequenced 
Cdoesn't include an index). 


7(€7) M,S The EXLST entry to be processed 
isn't present. 


8(8) G Not enough virtual storage is available, 
wy or (with AM=VTAM specified) list and 

execute forms are inconsistent. 

9(9) G,S User area is too small. 

10CA) G,M Exit address isn't specified in the 
input. 

11¢B) M The RPL to be processed is activa, 
or it is already being processed. 

12(C) M The ACB to be processed is open-it 
must be closed. 

13(D) M No exit addrass is specified in the 
input for the exit to be activated. 

14(CE) G»M,T An invalid combination of option codes 


(for example, for MACRF or OPTCD) is 
specified. 


15(F) G,S The user area isn't on a fullword 
boundary. 
16(10) G»M,S,T A VTAM keyword is specified with AM=VTAM 


not specified or AM=VTAM is specified but 
the control block subtype is not VTAM. 


19(13) M,S,T A specified keyword refers to a fiald 
beyond the end of the control block to 
be processed. 


C 
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Applicable 
Code Macrosl Condition . 
200614) S$ A specified keyword requires processing 


with shared resources to be specified, 
but it isn't. 


21¢€15) S,T The block to be displayed or tested does 
not exist, because tha data set is a 
dummy data set. 


: G=GENCB, M=MODCB, S=SHOWCB, T=TESTCB 


All errors in control block manipulation are datected by 
IDAO019C1. 


=S AG GEME 


The getting and freeing of storage for VSAM control blocks ara 
managed centrally by IDA0192M. To allocate storage efficiently, 
IDA0192M Cin most cases) gets storage in blocks large enough to 
satisfy not only a current request for storaga for a control 
block, but also subsequent requests for storage for the same or 
a related control block. Figure 69 on page 469 indicates: 


e sia cata block(€s) are stored in each type of storage 
oc 


e What block gives the address of each storage block 


e What subpool each storage block is located in (subpools 234, 
241, 245, and 252 are protected with key 0; subpool 250 is 


unprotacted) 
e The size of each storage block Cunused space in a block is ) 
freed after all required control blocks have bean allocated) | 


e Whether each storage block is fixed in real storage by Open 


To allocate and free storage ina storage block, IDA0192M uses 
alata ore blocks (which are described in detail in "Data 
reas"): 


e BIB—the base information block is built in Subpool 252 upon 
a request to build it from the VSAM Open module IDA0192A. 
One BIB is built for all processing related to a particular 
base cluster in the job step. 


e CMB—the cluster management block is built in subpool 252 
upon the first request to open a particular cluster from the 
VSAM Open module IDAOD192F. It enables IDA0192M to control 
the allocation and freeing of control blocks for the 
cluster. It contains the addresses of the header elements 
in header element blocks (described next) that identify the 
storage blocks that contain control blocks for the cluster. 


After a CMB has been built for a cluster, subsequent 
requests for storage for control blocks for the cluster 
Cralated to the same open) are satisfied, if possible, by 
using storage blocks already obtained. As storage blocks 
fill up, IDA0192M gets additional ones. 


e HEB—-the header element block is built Cin the protected 
sphere block) by IDA0192M to manage the allocation and 
freeing of unprotected storage blocks. <A HEB contains 16 
header elements, each of which, when used, identifies and 
describes a storage block. The CMB indicates by the 
position of an entry that points to a header element what 
type of storage block the header element describes. The 
header element gives the block's address, langth, subpool os 
number, and available space. It doesn't give the address 
Within the block of individual control blocks. These 
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addresses are given by the control blocks within the VSAM 
control block structura, which is described in "Data Areas." 


Fixed in 
Pointed Obtained Size Real Storage 
Storage Block Contains to by in Subpool (Bytes) by Open? 
Blocks Related to the Job Step as a Whole 
Sphere Block?! ACBs for the base BIB 2502,°% 2K or No 
cluster (Cpath larger 
processing) and 
the alternate 
indexes in the 
upgrade set, RPLs 
for thea alternate 
indexes in the 
upgrade set, UPT 
Protected AMBLs for the BIB 2522, 1K or No 
Sphere AMBL base cluster larger 
Block? (path processing) 
and the alternate 
indexes in the 
upgrade set 
Protected HEBs BIB 241 1K or No 
Sphere Block larger 
Blocks Related to a Particular Cluster 
Buffer Block’ I/0 buffers CMB 2502,5 Langth No® 
of the 
buffers 
requested 
Upgrade I/0 buffers CMB 250 Langth No 
Buffer of tha 
Block?, 4 buffers 
requested 
DEB Block DEB CMB 2307 Langth of No® 
the DEB 
EDB Block EDB CMB 252?2,5 Langth of No® 
the EDB 
String BUFCs, PLHs, CMB 2502, 2K or No® 
Block’, ® RPLs for path larger 
PLHs, WAXs for 
path PLHs 
Fixed String PFLs, IOSBs, CMB 245 Langth No 
Block*, ® SRBs, IQEs of fixed 
string, 
plus VGTT 
header 
Protected IOMBs, CPA CMB 2522,5 4K or No® 
String larger 
Block*, ® 
Upgrade BUFCs, PLHs CMB 250 2K or No 
String larger 
Block »* 


Figure 69 (Part 1 of 2). Storage Blocks Used for Virtual~Storage Management 
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Fixed in 
Pointed Obtained Size Real Storage | 
Storage Block Contains to by in Subpool (Bytes) by Open? 
Blocks Related to a Particular Cluster (continued) 
Fixed Upgrade PFLs, IOSBs, CMB 245 Length No 
String SRBs, IQEs of fixed 
Block?,* string, 
plus VGTT 
header 
Protected IOMBs, CPA CMB 252 2K or No 
Upgrade larger 
String 
Block?, 4 
User Block AMBXN, AMDSBs, CMB 2502,° 2K or No® 
ARDBs, BUFC larger 


headers, preformat 
BUFCs, preformat 


CPAs, IWAS 

Protected LPMBs, AMBs CMB 2522,5 3 LPMBs, No® 

User 2 AMBs, 

Block 64 bytes 
for set 
sector 
table 

Fixed Block‘ IRB CMB 254? 1 IRB No 

i This block doesn't exist for a catalog or a catalog recovery area built in 

system storage. } 


2 Subpool is 231 for a catalog or a catalog recovery area built in system storaga; 
subpool is 241 for processing with global shared resources (GSR). 


s Subpool is 241 for processing CBIC. 


4 This block isn't built by Open for processing with shared resources-it's built 
by BLDVRP and resides in the resource pool. 


5 Subpool is 231 for processing CBIC. 


6 This block is fixed itn real storage if requested by the user for improved 
control-interval processing (fast path). 


7 Subpool is 241 for a catalog, for a catalog recovery area built in system 
storage, nor processing with global shared resources (GSR), or control blocks in 
common (CBIC). 


8 For certain processing, Close acquires this block and frees it after the 
processing is finished. 


9%. Subpool is 245 for a catalog, for a catalog recovery area built in system 
storage, or for control blocks in common (CBIC). For processing with global 
shared resources (GSR), subpool 239 is used. 


Figure 69 (Part 2 of 2). Storage Blocks Used for Virtual-Storage Management 
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Figure 70 on page 472 gives the interrelationship of these 
control blocks. It shows two storage blocks obtained for DEBs. 
Storage blocks are obtained for other control blocks in the same 
way. A DEB block is just large enough to contain the DEB for 
which storage is requested. Some other storage blocks are large 
enough to contain several control blocks of the same or a 
related type, for which storage might be requested subsequently. 


As a by-product, these control blocks map the location, by 
storage block, of VSAM control blocks for clusters (Cand 
associated paths and upgrade sets). BIBs, CMBs, and HEBs are in 
protected storage; they can be used to find a control block when 
a pointer in the VSAM control block structure has been destroyed 
or can't be found. 
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VSAM O/C/EOV 


t CMB Virtual 


Storage 
ubpool | Size of Request Management 


Parameter 









*#A 








t Sphere Block 
t Protected Sphere Block 


+ First HEB 


24 
28 
32 


31st Entry 


Protected Sphere Block 


=> Ser 
| First Header Element Header Element aie ae 
¢ 


36 


Second Header Element gi 
Third Header Element 
Fourth Header Element 


é 16th Header Element 


(“Dummy”) AMBLs for base 
cluster (path processing) and 
alternate indexes in upgrade set 


8 | tf User Block Header 





12 | t Protected User Block Header 







16 | t String Block Header 





20 | t Upgrade String Block Header 


24 | t Fixed String Block Header 


og | t Fixed Upgrade 
String Block Header 


32] ft Buffer Block Header 

36] fT Upgrade Buffer Block Header 
40| ft DEB Block Header 

44| ft EDB Block Header 


48] +Protected String Block Header 


$2 tProtected Upgrade String 
Block Header 5 


Figure 70. Virtual Storage Management Control Block Structure 
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cluster (path processing) 
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in the upgrade set 
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DEB Storage Block 


First DEB 
for which 
storuge was 
requested 





DEB Storage Block 


Second DEB 
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storage was 
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OPEN, CLOSE, AND END-OF-VOLUME DIAGNOSTICS 


( This section describes information in dumps from Open, Close, 
and End of Volume and how to obtain dumps additional to standard 
dumps. 


DATA-SET MANAGEMENT RECOVERY ROUTINE (CIDAOCEA1) 


IDAOCEA1 gets control from the ESTAE routine for I/0 support 
recovery when an error occurs while Open, Close, or End of 
Volume is processing. 


IDAOCEAI records in the field SDWARECP of the STAE diagnostic 
work area (SDWA, also known as the recovery termination 
communication area-—-RTCA) the 8-character name of the failing 
module, its 8-character CSECT name, and the 8-character name of 
the recovery routine. SDWA is dumped into SYS1.LOGREC. The 
areas and modules identified here are dumped into SYS1.DUMP. 


IDAOCEAI uses the two words DXATEXC1 and DXATEXC2 in the 
Open/Close/End-of-Volume work area (referred to in program 
comments as "FORCORE"™). 


The first byte in DXATEXCL indicates the function in progress 
when the error occurred: 


X'80! IFGO192A, the interface batween Opean/Close/End 
of Volume and VSAM (this high-order bit is on in 
all cases) 
X'40! ISAM-interfaca Close 
X'20' ISAM-interface Open 
X*10' Temporary Close 
X'08! End of Volume 
oe Close 
X'O2' Open 
XFoi't BLDVRP or DLVRP (build or delete VSAM resource pool) 


The second byte in DXATEXC1 is an indicator for 
checkpoint/restart processing: 


De ects ae aet ie Checkpoint in progress 
es eer eee Restart in progress 
Pa) Cee Checkpoint/restart cleanup processing 
Bale tergrang Recovery routina recursion indicator 
. xXx Raserved 


The third byte is an additional option byte: 


Dace: eaves Open/Close/End of Volume obtaining 
storage from CSA 
XXX XXX Reserved 


The fourth byta is reserved. 


DXATEXC2 contains the last four characters of the module in 
control (the first four characters are assumed to be IDA0). 


ISAM-INTERFACE DATA=SET MANAGEMENT RECOVERY ROUTINE (IDAICIA1) 


IDAICIA1 gets control from IDAOCEA1 when an error occurs in 
ISAM-interface Open or Close processing. To datarmine what to 
do, it uses audit flags sat by IDA0N192I or IDA0200S in thea IIAUD 
fialds in the IICB control block. The IICB is pointed to by 
DXATEXC2 in the Open/Close/End-of-Voluma work area. (The format 
of the IIAUD information is givan in "Data Areas.") 


An error may have been caused by the ISAM interface or by the 
( user. For an ISAM~interface error, IDAICIAIL: 


e Issues SDUMP to record information in SY$S1.DUMP 
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e Issues SETRP to record the STAE diagnostic work area (SDWA) 
in SYS1.LOGREC 


e Closes the associated DCB, which includes: J 


Deleting routines 
Freeing storaga 

Restoring the DCB 
Unchaining the DEB 


The areas dumped by way of the SDUMP macro are indicated in the 
address list in SDUMPLST, which is associated with the macro. 
The addresses listed are those of: 


Tha list 

Tha user's DCB 

The protected DCB (copied into the Open work area) 
The Open/Close/End-of-Volume work area 

The SDWA 

The DEB Cor 0) 

The IICB Cor 90) 

The I/O buffers Cor 0) 

The physical-error message area Cor 0) 


For a user error, IDAICIA1 issues SETRP to record the SDWA in 
a dated a data set. SDWA contains addresses of the areas to 
e dumped: 


The user's DCB 
The IICB 
The AMDSB 


It also contains flags that indicate that this program data 
should be dumped: 


Save areas a 


Registers 
Program Status Word 
User subpools 


User errors include ABEND 03B from IDA0192I, ABEND 031 from 
IDAIIPM1 or IDAIISMI1, and errors ina DCB exit routine. "Abends 
Issued by VSAM," later in this chapter, discusses errors that 
result in abends. 


GETTING A DUMP OF OPEN, CLOSE, AND END-OF-VOLUME WORK AREAS 


The messages that problem determination CIDA0192P) issues for 
Open, Close, and End of Volume may not be sufficiant to 
datermine what's wrong. 


In such a case, you can get an abend dump by turning on a bit in 
the CVT Ccommunication vector table) and rerunning the job in 
error. Use the processor manual procedure AM (alter main 
storage) to set bit 4 of the first byte of CVTAMFF to ‘1’ for 
VSAM to ABEND. Set bit 6 of tha third byta of CVTAMFF to ‘'1' to 
prevant the freeing of work areas. 


CVTAMFF 
08 109 10A 10B 


eae 
2 ee oo ee 


After the error occurs, IDA0192P issues its message and also 
issues an abend with a user coda of 888. 
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The contents of the registers (0-15) of the module that called 
IDAQ0192P Cthe same module identified by the function code in the 

( | problem-determination message) can be found at the address 
calculated by adding X'140' to the contents of register 4 at 
entry to abend. 


The caller's register 13 contains the address of its standard 
register save area. The save areas of modules that had control 


before an abnormal termination are chained together, as shown in 
Figure 71. 


C 
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Common Data-Set 
Management (I/O Support) | 
Work Area 

o/c FORCORE 


WTG Table j 
Main Work Area Copy of the ACB 


for the ACB 





Copy of the 
User’s Parameter 


List 


Recovery Routine’s 416(1A0) DXCCW7 


Audit Trail 





Common Routine’s IFGO192A’s 
Work Area and 0 Save Area 


Back Chain = 0 


Register Save 
Area (15 Full- 

words) of Module 
that Has First 





Trace Buffer 








72(48) 





Register 13 











First MWA Second MWA 


ee 
noun} 


Register Save 
Area of Module 





Back Chain 
Forward Chain = 0 


Visual ID 





Register Save Area 


of Module That Has That Has Third 


MWA 


Second MWA 





Visual ID Visual ID 
Length of MWA Length of MWA Length of MWA 


Figure 71. Chaining of Save Araas of O/C/EOV Modules 
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Open, Close, and End-of-Volume modules (with the exception of 
IDA0192D, IDA0192G, IDA0192I, IDA0192M, and IDA0557A) use a main 
work area, OPWA Coften called FORCORE), to communicate with one 
another. The field DXCCWN7 contains the address of IFGO192ZA's 
save area, which contains the address of the next save area, and 
so on. Each save area after IFG0192A's contains the address of 
the previous save area. By following the back chain from the 
module that called IDA0192P, you can locate the save area of 
each module in Open, Close, or End of Volume that had control 
before the abnormal termination. 


The save area is the first part of each module's work area (MWA, 
module work area, also called an ADA, automatic data area). It 
is used to store the contents of registers at entry to the next 
module that gets control. It is followed by a visual ID for 
easy recognition in the EBCDIC part of a dump listing. The 
visual ID contains the name of the module and the Julian date of 
its compilation. 


For an Open or a Close request (but not for End of Volume), the 
first work area obtained to process the request points to an 
OPWA for each ACB or DCB to be opened or closed. OPWA points to 
an area that contains a copy of the ACB or DCB. 


During Open processing, register ¢ contains the address of the 
open work area (OPW, mapped by IDAOPWRK and also called the ACB 
work area). OPW has the visual ID 'IDAOPWRK’. 


During Close processing, register 4 contains the address of the 
close work area (CLW, mapped by IDACLWRK). 


The open and close work areas are described under "Data Areas." 


End of Volume uses its own module work area (MWA)—it doesn't 
have a special work area that corresponds to OPW or CLW. End of 
Volume's MWA has no visual ID. (CRegister 13 contains its 
address during End-of-Volume processing. ) 


GETTING A DUMP OF VSAM CONTROL BLOCKS IN CSA 


Control blocks and storage areas for data processed with the 
global shared resources (GSR) option and the CBIC option are 
built in CSA, and the VSAM SNAP dump facility provides 
hexadecimal printouts of those control blocks and areas. 


To get the dump, SDATA=CB must be specified in the SNAP macro 
(described in Supervisor Servi and Macr ns ctions) or 
must be specified to ABDUMP via the CHNGDUMP operator command or 
the IEAABD00 member of PARMLIB. Since the dump is actually made 
during SNAP processing, CSA is available anytime during job 
execution, not just during abnormal termination. 


The VSAM SNAP formatting routine, IDAO195A, receives control 
from SNAP module IEAVAD08 (described in System Logic Library). 
It locates, formats, and passes to the SNAP output routine the 
following types of VSAM data in CSA: 


e The JSCBSHR for the TCB being snapped. This field points to 
the valid-AMBL table CVAT) at the head of the VAT chain. 


e The control blocks for any open VSAM GSR data set for the 
TCB being dumped. 


° The control blocks that make up the GSR pool, if there were 
open GSR data sets or if the TCB being dumped is the jobstep 
TCB which itssued the GSR BLDVRP macro. 


e The VGTT chain for the ASCB associated with the TCB being 
dumped as well as any PSBs associated with these VGTTs. 


o The control blocks for any open VSAM CBIC data set for the 
dumped TCB. 
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The control blocks and storage areas made available by the dump 
facility are shown in Figure 72. On the actual printouts, each . 
block of data is preceded by an identifying line that names the 

data (VSRT, for example) and gives its address and length. | 
Output samples are shown in Debugging Handbook. 


JSCBSHR: 


TCB 





JSCBSHR 


VGTT Chain and Associated PSBs: 


tVGTT 


6 
Ff 


vcTtT! 
eer 
VGTT 


PSB 


tNext 
vctTT! 0 


1 eP fae F 
: 
: : 
UL 


o 
w 
i) 
a) 
~” 


tNext 
PSB 


af 


tNex 
PSB 


1 IDAO195A monitors the following of this chain, and the processing may end before 
all control blocks in the chain are formatted. See "Range Variables.” 


Figure 72 (Part 1 of 3). SAU Blocks Made Available by the VSAM SNAP Dump 
acility 


2 
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( | Open VSAM Data Set with GSR Option. 


tDEB 


t Next 











o a 
il Euvi : TAL 


DEB! ACB 
: ae 
AMBL 
1AMBL 
CS a ee ee 
| | fre 
+BIB 
BIB 


VSI 
AMB 
SI 





: 





t PSAB 


dh i 


DEB 
t PSB 






t Next 


g 


TAMBL 


V 


tNext 
~ _ 


° = > lo 
o 
w 


Storage Storage 


Storage 


Be 
=] 


1 IDA0195A monitors the following of this chain, and the processing may end before 
all control blocks in the chain are formatted. See "Range Variables." 


Figure 72 (Part 2 of 3). eee ee Blocks Made Available by the VSAM SNAP Dump 
Facility 
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IDAO1L95A monitors the following of this chain, and the processing may end before 
all control blocks in the chain are formatted. 


This storage is located via the embedded VSRT CSLs. 


See "Range Variables." 


The other storage is 


located via chains out of the VSRT or by slot entries in WSHDs CWSHDSLT). 


Figure 72 (Part 3 of 3). 
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Entry and Exit 


Range Variables 


IDA0195A receives control in key 0 supervisor state with no 
locks held; ESTAE has been issued. Register contents upon entry 
are: 


R1 Address of IHAABDPL 
R13 Save area address 

R14 Return address 

R15 IDA0195A base address 


Return in most cases will be to the caller, with registers 0 
through 14 restored. Register 15 contains a return code: zero 
is normal return, nonzero is an error return. A nonzero return 
code causes VSAM formatting to stop and the message "VSAM 
CONTROL BLOCKS UNAVAILABLE” to appear in the dump. 


Should an error occur that precludes the dumping of data, the 
message "IDA0195A DATA SUPPRESSED DUE TO ERROR" will appear in 
place of the data. Data will be suppressed because of machine 
checks and program interrupts (for example, address, page, 
segment, and protection exceptions). 


To prevent endless looping through invalid chained data, 
IDA0195A has established range variables for loop detection and 
control. Control block chains will be followed until the range 
value is reached, and then the routine will force a logical end 
of chain and place the message "EXCESSIVE XXXX DETECTED BY 
IDAO0195A" in the SNAP data set. XXXX describes the data being 
formatted when the suspension occurred. For example, "EXCESSIVE 
DETECTED BY IDA0195A." 


The range variables Cidentified as DEBCNTIMX, HEBCNTMX, VSAMCBMX, 
and MAXVCSLN) are grouped in the IDA0195A CSECT. Although the 
variables have been set high to allow for very large VSAM 
structures, they can be changed by using the service aid 
IMASPZAP C'*SUPERZAP'). Modification requires a listing and 
possibly a dump of IDA0195A on the affected system. The 
variables are located in the following IDA0195A structure: 


Offset Variable Value 

0 Visual ID EBCDIC: THRESHOLD VALUES 
16 DEBCNTMX Decimal 200 

20 HEBCNTMX Decimal 17 

24 VSAMCBMX Decimal 16 

28 MAXVCSLN Decimal 20 
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The following list identifies the range variable that influences 
the display of specific data or chains of data: 


Data/Chain Name Range Variable J 
TCB DEB Chain DEBCNTMX 

PSB chain of VGTT VSAMCBMX 

VGTT chain VSAMCBMX 
WSHD slot count DIM CWSHDSLT) 
CPA WSHD chain VSAMCBMX 
WSHD chain VSAMCBMX 

VSRT internal CSL list MAXVCSLN 

GSR VMT chain VSAMCBMX 

GSR HEB entries HEBCNTMX 

GSR PSB chain VSAMCBMX 

GSR PSAB chain VSAMCBMX 


Formatting of VSAM information will be suspended without an 
error message when one SNAP exceeds 256 CMBs or BIBs or when a 
HEB spans the PSB in which it resides. When the number of CMBs 
or BIBs exceeds 256, that portion of formatting produces no 
output, while other logic remains operative. Unlike the range 
variables, values for CMBs and BIBs cannot be modified. 
Increasing the BIB and CMB values requires a recompilation, but 
this should not be necessary since these limits exceed the DEB 
chain variable in size. 


Although covered by mainline SNAP's recovery routine, IDAO1LS5A 
establishes its own ESTAE environment after gaining Soares 
The ESTAE routine, RCVRRTN, returns control to mainli 

IDA0195A, which displays the message "IDA0195A DATA SUPPRESSED 
DUE TO ERROR" and concludes VSAM formatting with the message 


"END OF VSAM DATA". No retry is done and percolation from 
RCVRRTN occurs when: 


e No SDWA is available 
e SDWACLUP=0N (cleanup entry) 
e SDWANRBE=ON Cerror was not from this RB) 


e Previous retry under this SNAP caused RCVRRIN to gain 
control (recursion) 


RCVRRTN will attempt to record SDWA errors in SYS1.LOGREC, if 
retry is not successful. 


RECOVERY WITH GLOBAL SHARED RESOURCES 


When the user processes data with the GSR (global shared 

resources) option, a task in one address space issues the BLDVRP 

macro to build the VSAM resource pool in global storage. This 

address space is responsible for issuing the DLVRP macro to 

delete the resource pool. If the address space or the region 

control task or the job step task of the responsible address 

space terminates without issuing DLVRP, the control program 

assumes responsibility for deleting the resource pool. ) 
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When the use count (count of data sets open) for the resource 
pool Cin the AMCBS, which is described in Catalog Diagnosis 
Reference) drops to 0, the control program issues the DLVRP 
macro. 

When the control program forces resource~pool deletion, it sends 
the standard problem-daetermination message, IEC251I, to the 
operator and to the output data set of the task that had been 
responsible for issuing DLVRP. The following return codes (re) 
and function codes (ccc) indicate what happened: 


re 176 (BO) oe blocks were dumped into the SYS1.DUMP data 
set. 


re 180 (B4) Only some control blocks could be dumped into the 
SYS1.DUMP data sat. 


re 184 (B8) No control blocks could be dumped into the 
SYS1.DUMP data set. 


cece 148 (94) VSAM Close module IDA0200T issued DLVRP. 

ccc 149 (95) VSAM task Close executor, IDAOCEA2, issued DLVRP. 
In the SYS1.DUMP data sat, the dumped control blocks are 
Beret Base eacee emead GSR FORCE DLVRP DUMP DATA." These 

° AMCBS 

e VSRT 

e WSHD and storage pointed to by it 

° CPA WSHD and storage pointed to by it 


® Control blocks and storage pointed to by the VSRT core save 
lists (CSLs) 


For a forced deletion of the global resource pool, VSAM does 


° Set the ACBERFLG return code 
e Provide GTF tracing 


@ Provide a message in the ACB message area 
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The I70 manager and the ISAM interface issue abends. The I/0 

manager stores the reason code for an abend in register 2 and ) 
stores all registers in the save area in the IOMB. Figure 73 

and Figure 74 on page 485 list and explain each occurrence of an 


abend. 
Reason 
Abend Code 
377¢€179) 4(04) 
8(08) 
12¢€0C) 
16¢€10) 
20(14) 
24(18) 
28¢1C) 
633(279) 4004) 
20(14) 
Figure 73. 
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Module 
IDAM19R3 


TGc1i21 
IGC121 
IGci2l 


IGci2l1 
CPAGEOUT 
routine) 


IDAI21A2 


IDA121A2 


IDA1LZ1A4 
CIDALZ1LF4 
routine) 


IDA121A4 


I/70-Management Abends 
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Explanation 


Error return from issuance of 
SETLOCK macro 


Invalid AMB or IOMB 
Invalid CPA 


Error in the PGFIX Routine 
Cit returned a code other than 
0 or 8) 


Invalid buffer address 


Error in converting to real 
address with LRA instruction 


Block size not 4K (4096) for 
track overflow 


Invalid BUFC-—the virtual 

storage originally assigned to 

the BUFC no longer belongs to | 
the user - | 


Protection check indicated in 
the IQSB from the I/0 
supervisor Cinvalid buffer 
address assumed to be the 
reason) 


2 
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Se Error Abend Error indication set 
detected issued in DCB or DECB by 
Abend Error by by 
1¢001) The user did not specify a SYNAD exit routine. 
(a) 1/0 error VSAM BISAM SYNAD (DECB) 
initially CIDAIIPM3) CIDAIISM1) 
and BISAM 
during 
CHECK 
(b) Invalid request BISAM BISAM BISAM (DECB) 
49¢€031) The user did not specify a SYNAD exit routine. 
Ca) VSAM physical VSAM SYNAD SYNAD 
or logical 
error 
(b) Invalid request VSAM SYNAD GET and SETL 
routines of SCAN 
CIDAIIPM2) 
(c) Sequence check LOAD LOAD RESUME routine of 
CIDAIIPM1) LOAD 
€d) Length error LOAD LOAD LOAD 


CRDW greater 
than LRECL) 


§7(039) End of data VSAM SCAN EODAD routine 
without EODAD CIDAIIPM2) of SCAN 
routine 

wy 

58C(03A) VSAM ACB closed CLOSE CLOSE CLOSE 
with warning CIDA02005S) 
messages 

59¢(03B) Validity check OPEN OPEN Validity-check 

CIDA0192I) routine of OPEN 


Catalog values and DCB values for LRECL, KEYLE, or RKP don't correspond, or, with 
QISAM, DISP is specified OLD when the data set is being opened for output, and there 
are already records in the data set (implying RELOAD). 


Figure 74. ISAM-Interface Abends 


Exception codes may be seat in the DCB (for QISAM processing) or 
the DECB (for BISAM processing) in connection with 
ISAM-Interface abends. Figure 75 on page 486 and Figure 76 on 
Page 487 give the exception codes. Except where indicated, 
register 15 contains 8, for logical errors. 


C 
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Figure 75. 


Explanation 
Record not found 


Record-length 
check 


Space not found 


Invalid request 


Uncorrectable 
I/O error 


Unreachable 
block 


Overflow record 
Cindicated for all 
READ requests) 


Duplicate \record 


tees Calways 


Channel program 
initiated by an 
asynchronous 
routine (never 
indicated, 
always 0) 


Previous macro was 
READ KU 


corresponding 
RPL feedback 
code(s) 


16(010) 
24(18) 
108(6C) 


28(1C) 


none 
20¢14) 
36024) 


64¢40) 
96(60) 


4-24 
(04-18) 


none 
8(08) 


none 


none 


none 
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Explanation 


Record not found 
Record on 
unmountable volume 


Record-length 
check 


Data set not 
extendable 


No RPL available 


Exclusive-control 
conflict 

No key range 
defined for 
insertion 
Placeholder not 
available 
Key-change 
attempted 


A physical error 
(Register 15 
contains 12¢€0C)) 


A logical error 
not covered by 
another exception 
code 


Duplicate record 
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Error 
detected 


By 


2 


VSAM 
VSAM 


VSAM 
VSAM 


ISAM 
Interface 
VSAM 


VSAM 


VSAM 
VSAM 


VSAM 


VSAM 


ISAM 
Interface 


VSAM 


ISAM 
Interface 
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Figure 76 (Part 1 of 2). 
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Explanation 


Record not found 


Invalid device 
address (never 
veneer always 


Space not found 


Invalid request 


Uncorrectable 
input error 


QISAM 
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Corresponding 
RPL feedback 
code(s) 


none 


28(1C) 
40(28) 


none 


4(04) 


20614) 
36(24) 


64040) 
96(60) 


4(04) 
8(08) 
12¢€0C) 
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Explanation 


Record not found 
CSETL K for 
deleted record) 
Record not found 
Record on 
unmountable 
volume 


Data set not 
extendable 
Virtual storage 
not available 


Two consecutive 
SETL requests; 
invalid SETL (CI 

or ID); or invalid 


generic key (KEY=0) 


Request issued 
after reaching end 
of data 
Exclusive-control 
conflict 

No key range 
defined for 
insertion 
Placeholder not 
available 
Key~change 
attempted 


Read error in data 
set 

Read error in 
index set 

Read error in 
sequence set 
(Register 15 
contains 12(0C)) 


Error 
detected 
By 


ISAM 
Interface 


VSAM 
VSAM 


VSAM 
VSAM 


ISAM 
Interface 


VSAM 


VSAM 
VSAM 


VSAM 
VSAM 


VSAM 
VSAM 
VSAM 
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DECB Corresponding Error 4 
exception RPL feedback detected 
code Explanation code(s) Explanation By 
DCBEXCD1 
hws BibSs Uncorrectable 16¢10) Write error in VSAM 
output error data set 
20¢14) Write error in VSAM 
index set 
24018) Write error in VSAM 
sequence set 
(Register 15 
contains 12¢(0C)) 
er mere Unreachable —- A logical error VSAM 
block Cinput) covered by another 
exception code 
Shite. eraceak Unreachable —— A logical error VSAM 
block Coutput) not covered by 
another exception 
code 
DCBEXCD2 
Ms dee “ws oh8 Sequence check none Sequence check ISAM 
(during resume Interface 
load only) 
12¢€0C) Sequence check VSAM 
pkete: * Orava Duplicate record 8(08) Duplicate record VSAM 
bets: uae DCB closed when none Error in Close VSAM 
error routine 
entered J 
Cn Sea a Overflow record none ISAM 
Calways indicated) Interface 
eee eee Length of logical none Length of logical ISAM 
record is greater record is greater Interface 
than DCBLRECL CVLR than DCBLRECL CVLR 
only) only) 
108¢6C) Invalid record VSAM 
length 
coos 0 XXX Reserved 
Calways 0) 
Figure 76 (Part 2 of 2). QISAM Exception Codes in Relation to VSAM Return Codes 
TERMRPL PROCESSING 


TERMRPL is a function used by a system component's ESTAE routine 
to release the VSAM resources associated with a requast CRPL) 
bealonging to a job that was abnormally terminated by a CANCEL or 


FORCE command. 


TERMRPL uses the RPL 


free up the resources held by a specific RPL. 


interface and will only 


It is the user's responsibility to determine which requests 
belong to the terminated job and issue TERMRPL against those 


requests. 


the user must 


macro. 
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specify PURGE=HALT, 
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To ansure no I/0 requests will be in process and that 
no asynchronous exit will be taken during the TERMRPL process, 
ASY=NO when issuing the ESTAE 
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When calling TERMRPL, the ESTAE routina must ba: 
e In Key 0 
e In Supervisor state 


@ Running under the same ASCB as the original terminated 
request. 


Unless tha TERMRPL request is rajected with a logical error 48 
or 52, the RPL is disconnected and any positioning for this RPL 
prior to the TERMRPL request will be lost. 


No attempt is made to resume or complete the outstanding 
input/output operations of the terminated request. As a result, 
the data set may or may not reflect the request being 
terminated. If the request is terminated during its I70 
operation, an information code is returned in RPLERRCD to 
indicate that the data set may have an error. 


TERMRPL cannot restart synchronous requests that are in the 
terminated address space. Asynchronous processing is not 
supported by TERMRPL. 


If End of Volume CEOV) is in process at the time TERMRPL is 
issued, the request is rejected and a logical error code will be 
returned to the user. 


Tests are made to ensure that the user is in key 0 and 
Supervisor state and that the RPL options and data set 
attributes are valid ones before the TERMRPL processing 
continues. See the description of logical error code 48 for tha 
detailed dascription of the invalid data set attributes or RPL 
options. A test is also made to prevent TERMRPL recursion. 

(See logical error code 52.) 


If the specified request (RPL) is not active or the associated 
string is not active, no operation is performed by TERMRPL. 


An assembler macro interface is provided to use the TERMRPL 
macro: 


Clabel) TERMRPL RPL=address 


where: 


is one to eight characters that provides a symbolic address 
for the TERMRPL macro. 


RPL=address 
specifies the address of the request parameter list that 
defines the terminated request. You may specify the 
address in register notation Cusing a register from 1 
through 12, enclosed in parentheses) or specify it with an 
expression that generates a valid relocatable A-type 
address constant. 


Upon completion of the request, TERMRPL will set a return code 
in register 15, RPLERREG, and RPLERRCD: 


Reg 15 Condition 
0¢€0) TERMRPL request completed successfully. 


4(4) Requast was not accepted; the specified RPL does not 
point to an active string. 


8(8) TERMRPL request is terminated because of a logical 
error; see error code in RPLERRCD. 
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When register 15 is zero, RPLERREG is zero. 


In addition, 


RPLERRCD will contain one of the following information codes! 
Condition 


Code 
0¢0) 


32(¢20) 


36 (24) 


40(¢28) 


When register 15 is eight, 


TERMRPL request completed successfully. No unusual 


conditions were detected. 


Request deferred for a resource held by the tarminated 
RPL is asynchronous and cannot be restarted by TERMRPL. 


Possible data set error condition was detected by 
TERMRPL: 


The request was abnormally terminated in the middle 
of its I/0 operation, or 


One of the data/index BUFCs of the string contains 
data that needs to be written (BUFCMW=O0N), 
was invalidated by TERMRPL. 


Error in PLH data BUFC pointer was detected by TERMRPL 


RPLFRREG is eight. 


but it 


In addition, 


RPLERRCD will contain one of the following logical error codes: 
Condition 


Code 
48(30) 


52(034) 


MVS/XA VSAM Logic 


Invalid options, 


conditions specified for TERMRPL request: 


CNV processing 


The specified RPL is asynchronous 


Chained RPLs 
PATH processing 


Shared resources (LSR/GSR) 


Create mode 


RRDS 


Data set contains spanned records 


User not in Key 0 and supervisor state 


EOV in process (secondary allocation) 


The previous request was TERMRPL. 
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GLOSSARY 


ACRONYMS AND ABBREVIATIONS 


Following is an alphabetized list of the 
acronyms and abbreviations used in this 
book and in the VSAM code listings. If 
you do not find the term you are looking 


for, 


see the index or the IBM Vocabulary 


for Data Processing, Telecommunications, 


and Office Systems, 


GC20-1699. 


ABEND abnormal end 

ABP actual block processor Ceither 
the IOM module IDA121A2 or the 
IOM communication vector 
table) 

ACB access method control block 

ADDR addressed processing or 
addressed 

ADR same as ADDR 

AIX alternate index 

AMB access method block 

AMBL access mathod block list 

AMBXN access method block extension 

AMDSB access method data statistics 
block 

AMS access method services 

ARDB address range definition block 

ASCB address~space control block 

BIB base information block 

BISAM basic ISAM 

BLPRM resource pool parameter list 

BSPH buffer subpool header 

BUFC buffer control block 

BWD backward Cprocessing) 

C Close 

C/R checkpoint/restart 

CA control area 

CATX option to open ICF catalog 
without SVC26 

CBUF control block update facility 

CCB command control block 

CHKPT checkpoint 

CI control interval 

CIDF control interval definition 
field 

CLW close work area (mapped by 
IDACLWRK) 

CMB cluster management block 

CNV control interval or 
control~interval processing 

CPA channel program area 

CRA catalog recovery area 

CSA common service area 

CSL core save list 

CVT communication vector table 

DCB data control block 

DDNAME data definition name 

DEB data extent block 

DIR direct processing 

DIWA data insert work area 

DSCB data set control block 

DSL DEB save list 

DSNAME data set name 

DSORG data set organization 
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Ext Proc 


FKS 
FS 
FWD 


GC 
GEN 
GSR 


HEB 


ICF 
ICIP 


ICWA 
ID 
IDAL 


II 
ITICB 
IMWA 
Int Proc 
I/0 
IOB 
IOM 
IOMB 
IOMBXN 
IOSB 
IRF 
ISAM 


JFCB 
JSCB 
JSTCB 
KEQ 


KGE 


event control block 
extended count~key~data 
architecture 

extent definition block 
and the request 

end of data 

end of file 

End of Volume 

external procedure entry point 
error flags 

enqueue save list 
exceptional conditions 
execute channel program 
exit list 

extarnal procedure 


full key search 
free space 
forward (Cprocessing) 


type code (group code) 
generic key search 
global shared resources 


header element block 


integrated catalog facility 
improved control-interval 
processing 

index create work area 
identifier 

indirect data~address list 
Creal page list) 

ISAM Interface 

ISAM interface control block 
index modification work area 
internal procedure 
input/output 

input/output block 

I/0 management 
I/O-management block 
I/O-management block extension 
I/O-supervisor block 
interrupt recognition flag 
indexed sequential access 
method 


job file control block 
job step control block 
job step task control block 


search on key equal 
keyed accessing 
search on key greater or equal 


link 

least length of record (that 
contains all key fields) 
logical-to-physical mapping 
block 

local shared resources 


macro reference 

module 

Mass Storage System 

mass storage volume inventory 
module work area 
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n 

NSI 
NSP 
NUP 


0 
O/C/EOV 
OFLG 
OPTCD 
OPW 


OPWA 
OPWRK 
PEL 
PFPL 


PIOD 
PLH 


RPLE 


RPS 
RRDS 
RTM 
RTN 


SCIB 
SCRA 


SDWA 
SEQ 


SIOD 


integer number 

next sequential instruction 
next string position 

no update 


Open 

Open/Close/End of Volume 

open flags 

option code 

open work area (mapped by 
IDAOPWRK) 

common O/C/EOV base work area 
VSAM O/C/EOV ACB work area 
(mapped by IDAOPWRK) 


page fix list 
PGFIX parameter list (same as 
FL) 


problem-state I/O driver 
placeholder list 
procedure 

protected sphere block 
Page save iist 
Programming Systems 
Representative 

program status word 


queued ISAM 


record area block 

relative byte address 
record definition field 
record management 
general-purpose register n 
request parameter list 
request parameter list 
extension 

rotational position sensing 
relative record data set 
recovery/termination manager 
routine 


search compressed index block 
catalog recovery area in 
system storage 

system diagnostic work area 
sequential or sequential 
processing 

supervisor~state I/0 driver 
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VVR 
WAX 
WSHD 
WTG 
XCTL 


XREF 
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skip sequential or skip 
sequential processing 

system management facilities 
sphere record area 

service request block 
subsystem checkpoint record 
swap save list 

set sector table 

number of RPL strings 
supervisor call 


task 
task 
time 


control block 
I/0 table 
sharing option 


unit control block 

cataiog recovery area in 
user's storage 

update mode (or data modify) 
upgrade table 

user security-authorization 
record 

user security-veri fication 
routine 


valid-AMBL table 

VSAM checkpoint/restart core 
VSAM checkpoint/restart table 
VSAM global termination table 
valid-IOMB table 

volume mount table 

virtual page list 

VSAM resource pool 

virtual storage access method 
VSAM shared information 
virtual subarea list (same as 
PFL or PFPL) 

VSAM shared resource table 
volume table of contents 
(replaced by MSVI) 

VSAM volume data set 

VSAM volume record 


work area for path processing 
working storage header 
where~to-go table 


transfer control (macro) 


checkpoint 
cross reference 
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DEFINITIONS OF TERMS USED IN THIS BOOK 


Access Method Services. A multifunction 
service program that dafines VSAM data 
sats and allocates space for them, 
converts indexed sequential data sets to 
key-~sequenced data sets with indexes, 
modifies data-set attributes in the 
catalog, reorganizes data sets, 
facilitates data portability between 
operating systems, creates backup copies 
of data sets and indexes, helps make 
inaccessible data sets accessible, and 
lists data-set records and catalog 
entries. 


addressed direct access. The retrieval 
or storage of a data record identified 
by its relative byte address, 
independent of the record's location 
relative to the previously retrieved or 
stored record. (See also keyed direct 
access, addressed sequential access, and 
keyed sequential access. ) 


addressed sequential access. The 
retrieval or storage of a data record in 
its entry sequence relative to the 
previously retrieved or stored record. 
(See also keyed sequential access, 
addressed direct access, and keyed 
direct access.) 


alternate index. A collection of index 
entries organized by the alternate keys 
of its associated base data records. 


alternate-index cluster. The data and 
index components of an alternate index. 


application. As used in this 
publication, the use to which an access 
method is put or the end result that it 
serves; contrasted to the internal 
operation of the access method. 


base cluster. <A key-sequenced or 
entry-sequenced cluster over which one 
or more alternate indexes are built. 


candidate volume. A direct-access 
storage volume that has been defined in 
a VSAM catalog as a VSAM volume; VSAM 
can automatically allocate space on this 
volume, as needed. 


catalog. 
catalog.) 


(See master catalog and user 


catalog recovery area. 


CIDF. Control interval definition 
fiald. The 4¢~byte control-~information 
field at the end of a control interval 
that gives the displacement from the 
beginning of the control interval to 
free space and the length of the free 
space. If the length is 0, tha 
displacement is to the beginning of the 
control information. 


cluster. <A combination of related VSAM 
data sets, identified by one name in a 


(See CRA.) 
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VSAM catalog and requiring a single DD 
statement. A key-sequeanced data set and 
its index form a cluster; an 
entry-sequenced data set alone forms a 
cluster. 


collating sequence. An ordering 
assigned to a set of items, such that 
any two sets in that assigned order can 
be collated. As used in this 
publication, the order defined by the 
System/370 8-bit code for alphabetic, 
numeric, and special characters. 


compendium. <A compendium gathers 
together and presents in concise form 
all the essential facts and details 
about a VSAM functional unit. 


component. As used in this book, a 
group of modules that perform a 
function, such as 1/0 Management. 
compression. (See key compression.) 
control area. A group of control 
intervals used as a unit for formatting 
a data set before adding records to it. 
Also, in a key-sequenced data set, the 
set of control intervals pointed to by a 
sequence-set index record; used by VSAM 
for distributing free space and for 
placing a saequence-set index record 
adjacent to its data. 


control-area split. The movement of the 
contents of some of the control 
intervals in a control area to a newly 
created control area, to facilitate the 
insertion or lengthening of a data 
record when there are no remaining free 
control intervals in the original 
control area. 


control interval. A fixed-length area 
of auxiliary-storage space in which VSAM 
stores records and distributes free 
space. It is the unit of information 
transmitted to or from auxiliary storage 
by VSAM, some integer multiple of 
blocksize. 


control-interval split. The movemant of 
some of the stored records in a control 
interval to a free control interval, to 
facilitate the insertion or lengthening 
of a record that won't fit in the 
original control interval. 


CRA. catalog recovery area. An 
entry-sequenced data sat that exists on 
each volume owned by a recoverable 
catalog, including the catalog volume 
itself. Tha CRA contains 
self-describing records as well as 
duplicates of catalog records that 
describe the volume. 


data integrity. Preservation of data or 
programs for their intended purpose. As 
used in this publication, the safaty of 
data from inadvertent destruction or 
alteration. 
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data record. A collection of items of 
information from the standpoint of its 
use in an application and not from the 
standpoint of the manner in which it is 
stored (see also stored record). 


data security. Prevention of access to 
or use of data or programs without 
authorization. As used in this 
publication, the safety of data from 
unauthorized use, theft, or purposeful 
destruction. 


data set. The major unit of data 
storage and retrieval in the operating 
system, consisting of data in a 
prescribed arrangement and described by 
control information to which the system 
has access. As used in this 
publication, a collection of fixed~- or 
variable-length records in auxiliary 
storage, arranged by VSAM in key 
sequence or in entry sequence. 

also key-sequenced data set and 
entry~sequenced data set.) 


data space. A storage area defined in 
the volume table of contents of a 
direct~access volume for the exclusive 
use of VSAM to store data sets, indexes, 
and catalogs. 


direct access. The retrieval or storage 
of data by a reference to its location 
in a data set rather than relative to 
the previously retrieved or stored data. 
(See also addressed direct access and 
keyed direct access.) 


distributed free space. Space reserved 
within the control intervals of a 
key~sequenced data set for inserting new 
records into the data set in key 
sequence; also, whole control intervals 
reserved in a control area for the same 
purpose. 


entry sequence. The order in which data 
records are physically arranged in 
auxiliary storage, without respect to 
thair contents. (Contrast to key 
sequence. ) 


entry-sequenced data set. A data set 
whose records are loaded without respect 
to their contents, and whose relative 
byte addresses cannot change. Records 
are retrieved and stored by addressed 
access, and new records are added at the 
and of the data set. 


extent. A continuous space allocated on 
a direct-access storage volume, reserved 
for a particular data space or data set. 


external procedure. A procedure that 
can be called by any other VSAM 
procedure; a procedure whose name is in 
the module's Cassembler listing) 
Wexternal symbol dictionary." 


field. In a record or a control block, 


a specified area used for a particular 
category of data or control information. 
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free space. 
space. ) 


(See distributed free 


generic key. A high-order portion of a 
key, containing characters that identi fy 
those records that are significant for a 
certain application. For example, it 
might be desirable to retrieve all 
records whose keys begin with the 
generic key AB, regardless of the full 
key values. 


global storage. Virtual storage that is 
not part of a user's private address 
space. 


GSR. global shared resources. 
shared resources. ) 


(See 


horizontal extension. An extension 
record pointed to by a catalog record's 
extension field. (See also vertical 
extension. ) 


horizontal pointer. <A pointer in an 
index record that gives the location of 
another index record in the same level 
that contains the next key in collating 
sequence; used for keyed sequential 
access. 


index. As used in this publication, an 
ordered collection of pairs, each 
consisting of a key and a pointer, used 
by VSAM to sequence and locate the 
records of a key~sequenced data set; 
organized in levels of index records. 
(See also index level, index set, and 
sequence set.) 


index entry. A key and a pointer paired 
together, where the key is the highest 
key Cin compressed form) entered in an 
index record or contained in a data 
record in a control interval, and the 
pointer gives the location of that index 
record or control interval. 


index level. A set of index records 
that order and give the location of 
records in the next lower level or 
(sequence set record) that giva the 
location of control intervals in the 
control area that it is associated with. 


index record. A collection of index 
entries that are retrieved and stored as 
a group. (Contrast to data record.) 


index replication. The use of an entire 
track of diract~-access storage to 
contain a8 many copies of a single index 
pecone as possible; reduces rotational 
elay. 


index set. The set of index levels 
above the sequence set. The index set 
and the sequence set together comprise 
the index. 


index upgrade. The process of 
reflacting changes made to a base 
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cluster in its associated alternate 

indexes. 

integrity. (See data integrity.) 

internal procedure. <A procedure that 

can be called only by other procedures 
(See also 


within the module. external 
procedure.) 


ISAM interface. A set of routines that 
allow a processing program coded to use 
ISAM Cindexed sequential access method) 
to gain access to a key-sequenced data 

set with an index. 


key. One or more characters within an 
item of data that are used to identi fy 
it or control its use. As used in this 
publication, one or more consecutive 
characters taken from a data record, 
used to idantify the record and 
establish its order with respect to 
other records. (¢ key field and 
generic key.) 


key compression. The elimination of 
characters from the front and the back 
of a key that VSAM does not need to 
distinguish the key from the preceding 
or following key in an index record; 
reduces storage space for an index. 


kay field. <A field located in the same 
position in each record of a data set, 
Whose contents are used for the key of a 
record. 


key sequence. The collating sequence of 
data records, determined by the value of 
the key field in each of the data 
records. May be the same as, or 
different from, the entry sequence of 
the records. 


key-sequenced data set. A data set 
whose records are loaded in key sequence 
and controlled by an index. Records are 
retrieved and stored by keyed access or 
by addressed access, and new records are 
inserted in the data set in key sequence 
by means of distributed free space. 
Relative byte addresses of records can 
change. 


keyed direct access. The retrieval or 
storage of a data record by use of an 
index that relates the record's key to 
its relative location in the data sat, 
independent of the record's location 
relative to the previously retrieved or 
stored record. ( addressed 
direct access, keyed sequential access, 
and addressed sequential access.) 


keyed sequential access. The retrieval 
or storage of a data record in its key 
sequence relative to the previously 
retrieved or stored record, as defined 
by the sequence set of an index. (See 
also addressed sequential access, keyed 
direct access, and addressed direct 
access.) 
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local storage. Virtual storage in a 
user's private address space. 


LSR. local shared resources. (S@@ 
shared resources. ) 


mass sequential insertion. <A technique 
VSAM uses for keyed sequential insertion 
of two or more records in sequence into 
a collating position in a data set: 

more efficient than inserting each 
record directly. 


mass storage volume. Two data 
cartridges in the IBM 3850 Mass Storage 
System that contain information 
equivalent to what could be stored on a 
direct~access storage volume. 


master catalog. A key-sequenced data 
set with an index containing extensive 
data-seat and volume information that 
VSAM requires to locate data sats, to 
allocate and deallocate storage space, 
to verify the authorization of a program 
or operator to gain access to a data 
set, and to accumulate usage statistics 
for data sets. 


memory. As used in this book, a synonym 
for the private address space in virtual 
storage. 


module. The unit of code that is 
link-edited. A program module has at 
least one procedure, and may have many. 


password. A unique string of characters 
stored in a catalog that a program, a 
computer operator, or a terminal user 
must supply to meet security 
requirements before a program gains 
access to a data seat. 


path. A named, logical antity composed 
of one or more clusters Can alternate 
index and its base cluster, for 
example). 


physical record. On a track of a 
direct-access storage device, the space 
between interrecord gaps. 


pointer. An address or other indication 
of location. For example, an RBA is a 
pointer that gives the relative location 
of a data record or a control interval 
in the data set to which it belongs. 

¢ so horizontal pointer and 
vertical pointer.) 


portability. The ability to use VSAM 
data sets with different operating 
systems. Volumes whose data sets are 
cataloged in a user catalog can be 
demounted from storage devices of one 
system, moved to another system, and 
mounted on storage devices of that 
system. Individual data sets can be 
transported between operating systems 
using Access Method Services.. 


prime index. The index component of a 
key~sequenced data set having one or 
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(See also index 


mora alternate indexes. 
and alternate index. ) 


prime key. The key of reference for a 
key~sequenced data set when it was 


loaded. (See also key.) 
Procedure. A functional unit of VSAM 


code that is entered only at one entry 
point and exits at the and of the 
procedure (the last line of the 
procedure's code). The procedure can 
call (transfer control, with a return to 
the procedure expected) other procedures 
within the module Cinternal calls) and 


can call other procedures in other VSAM . 


modules (external calls). (See also 
internal procedure and external 
procedure. ) 


random access. 


RBA. Relative byte address. The 
displacement of a data record or a 
control interval from the beginning of 
the data set to which it belongs; 
independent of the manner in which the 
data set is stored. 


RDF. Record definition field. <A 3-byte 
control-information field to the left of 
the CIDF in a control interval that 
gives the length of a record in the 
control interval or the number of 
consecutive records having the same 
length. 


(See direct access.) 


record. (See index record, data record, 
stored record.) 


relative byte address. (See RBA.) 


relative record data set. A data set 
whose records are loaded into 
fixed-length slots. 


relative record number. A number that 
identifies not only tha slot ina 
relative record data set but also tha 
record occupying the slot. 


(Sea index replication.) 


A VSAM data sat that 
regardless 


replication. 


reusable data set. 
can be reused as a work file, 
of its old contents. 
security. (Se@ data security.) 
segment. The portion of a spanned 


record contained within a control 
interval. (See also spanned record.) 


sequence set. The lowest level of the 
index of a key-~sequenced data set; it 
gives the locations of the control 
intervals in the data sat and orders 
them by the key sequence of the data 
records they contain. The saquence set 
oe thea index set together comprise the 
index. 
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sequential access. The retrieval or 
storage of a data record in either its 
entry sequence or its key sequence, 
relative to the praviously retrieved or 
stored record. See also addressed 
sequential access and keyed sequential 
access.) 


shared resources. The sharing of a pool 
of I/0-related control blocks, channel 
programs, and buffers among several VSAM 
data sets open at the same time. 
Resources are shared either locally 
CLSR) or globally CGSR). 


skip sequential access. Keyed 
sequential retrieval or storage of 
records here and there throughout a data 
set, skipping automatically to the 
desired record or collating position for 
insertion: VSAM scans the sequence set 
to find a record or a collating 
position. 


spanned record. A record whose length 
exceeds control-interval length and, as 
a result, crosses or spans one or more 
control-interval boundaries within a 
single control area. 


sphere. The collection of basa cluster, 
alternate indexes, and upgrade alternate 
indexes opened to process one or more 
paths related to tha same Base 
Information Block (BIB). 


stored record. A data record, together 
with its control information, as stored 
in auxiliary storage. 


string. The part of a control block 
structure built around a placeholder 
CPLH) that enables VSAM to keep track of 
one position in the data set that the 
control block structure describes. 


Upgrade set. All the alternate indexes 
that VSAM has been instructed to update 
whenever there is a change to the data 

component of the base cluster. 


user catalog. <A catalog used in the 
same way as the master catalog, but 
optional and pointed to by the master 
catalog, and also used to lassen the 
contention for the master catalog and to 
facilitate volume portability. 


vertical extension. An extension record 
pointed to by a set-of-fields pointer in 
the object's base catalog record or its 
horizontal extension. (See also base 
catalog record and horizontal 
extension. ) 


vertical pointer. <A pointer in an index 
record of a given level that gives the 
lecation of an index record in the next 
lower level or the location of a control 
interval in the data set controlled by 
the index. 
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ABDUMP 477 
abend macro 
vane by I/0 management 198, 203, 


issued by ISAM interface 485 
issued by Open/Close/End of 
Volume 51 
Abnormal End Appendage 
IDA121A4 459 
ABP control block I/0-management 
communication vector table 
description of 
mapped by IEZABP macro 437 
ACB control block 
conditions before open 41 
description of 
mapped by IFGACB macro 437 
STRNO parameter and the number of 
placeholders 71 
used during 
Close processing 27, 41 
Open processing 11 
restart processing 61, 63, 65 
ACB macro 
ACBMERGE IDA0192I 11 
ACQUIRE Mass Storage System 
End-of-Volume 165, 279 
Open 209 
temporary Close 45, 221 
add-to-end processing 
during data set creation 8&3 
during key-sequenced data set 
modification 105 
adding a control interval to the data 
set for the user's program 
addressed diract GET 77 
addressed processing 137 
addressed sequential GET 81 
restrictions 71 
ADVPLH IDAOI9RR 81 
ADVPLH IDAOD19R4 81, 234 
allocating space to a VSAM data set or 
key range 165 
ALLOCSPC IDA0557B 163, 165 
alternate indax 
Close processing 30, 34, 44 
control block structure 333 
format 323 
Open processing 18, 20 
path processing 150 
record mapped by IDAAIR macro 434 
temporary Close processing 4%4% 
upgrade processing 152, 267, 268 
See also path processing 
AMB control block 
built by Open 13, 209 
dascription of 346 
mapped by IDAAMB macro 434 
used during 
End-of-Voluma processing 162 
restart processing 61 


validated by I/0 management 192, 193 


AMBL control block 
built by Open 13, 209 
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description of 349 
mapped by IDAAMBL macro 434 
used during 
Open processing 11 
AMBXN control block 
built by Open 13, 209 
description of 352 
mapped by IDAAMBXN macro 434 
used by 
End-of-Volume 162 
AMCBS~——access method control block 
structure block 353 
AMDSB control block 
built by Open 13, 209 
description of 355 
mapped by IDAAMDSB macro 434 
used during restart processing 63 
AMEMTERM IDAOCEA2 51 
AMP JCL DD parameter 
used to specify ISAM SYNAD 
routine 
used to start traca function 442 
AMSMERGE IDA0192I 23 
appendages, end, I/0 management 201 
ARDB control block 
built by Open 13, 209 
description of 56 
mapped by IDAARDB macro 434 
used during restart processing 63 
ARDBSCH IDA0557B 163 
argument control entry 184, 186 
ASCB control block 52 
assignment of placeholders to a request 
string——effect of ENDRE@ on 
asynchronous processing CHECK 
description of 131 
asynchronous request——daferred 75 
auxiliary storage manager 197-201, 280 


backward processing, retrieval 80 
BFRMERGE IDA0192I 23 
BIB control block 
description of 357 
mapped by IDABIB macro 435 
used by Virtual Storage 
Management 72 
BISAM basic indexed sequential access 
method raquest translation 
Sea also ISAM Interf 
See also ISAM interfaca 
description of 168 
exception codes in realation to VSAM 
return codes 486 
BLDAMBL IDAO1L92F 17, 19, 21 
BLDBUFC IDA0192Y 11, 47 
BLDBUFR IDA01L92I 23 
BLDCMB IDA0N192F 17, 19, 198 
BLDDDEB IDA0192A 11 
BLDENQPL IDA0192A 13 
BLDIDAL IGC121 194 
BLDIICB IDA0192I_ Ii 
BLDLISTS IDAOD192A 13 
BLDOPEN IDAOAOS5B 63 
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BLDRPL IDA0N192I 23 
BLDUPGRD IDAOA05B 63 
BLDVAT IDA0192Y 47 
BLDVPL IGC121 193 
BLDVRP 
macro 438, 440 
mathod of operation 46, 477 
program organization 224 
recovery 47, 47 
BLDVRP IDA0192Y 47 
BLDVRP/DLVRP ESTAE routine IDAOQCEA4% 47 
BLDVSRP IDAOAO5B 63 
BLDVSRT IDAO0192Y 47 
BLDOWSHD IDAO0192Y 47 
blocksize 315 
BLPRM parameter list 
described 359 
initialized 63 
mapped by IDABLPRM 359, 435 
BSPH control block 
description of 361 
mapped by IDABSPH macra 435 
processing with shared 
rasources 144, 148 
BUFC control block 
built by Open 13, 209 
dascription of 362 
mapped by IDABUFC macro 435 
used by I/0 management 193 
used during CHECK processing 131 
buffer assignment to create-modae PUT 
processing 
buffer management 
freeing buffers 154 
locating the next data control 
interval 160 
mathod of operation 154 
program organization 270 
reading a data control interval into 
a buffer 156 
reading an index control interval 
into a buffer 
buffers built for ISAM-interface 
user 24 
BUILDDEB IDA0192I 23 
BUILDFS IDAQLORE 103 
BUILDFS IDA019SA 246 
building a control block at execution 
time-—GENCB processing 185 
building an index entry 
after a control area split l 
for data set modification i11 
building an SSCR 58 
BUILDREC IDAO019RJ 117, 121 
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CALLABP IGC121 194 
candidate volume-—and End-of-Volume 
processing 165 
CATALC IDA0557B 163 
catalog 13 
catalog recovery area 
Close 
Open 13 
catalog, 3 
CATBLK IDA0557B 165 
CATLAC IDAO0557B 165 
CATLG macro SVC 26 438 
CATLOCDS IDA0557A 165 
CATLOCRB IDA0557B 165 


05 
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CATLOCXT IDAO557B 165 
CATUPD IDA0557B 163 
CATUPDVO IDA0557B 165 
CBINIT IDA0200B 39 
CBRELE IDA200B 39 
channel program 
format 369 
CHECK request 
and the user's SYNAD axit 
routine 31 
issued by a BISAM-user's program i169 
Checkpoint processing 
program organization 226 
CHGEPTRS IDAL21A4 203 
CHKIOMB IGC121 193 
CHNAMBL IDAO192F 17 
CHNGDUMP command 477 
CIFULL IDAO1L9ORM 244 
CLEANUP IDAOI96C 59 
CLEARSEG IDAO019RS 101, 123, 244 
CLNUP IDA0192A 23 
Close 
diagnostic information 473 
method of operation 27 
Summary of 
Close (TYPE=T) 
See also Close 
method of operation 42 
program organization 220 
CLOSE macro 
Sea also Close 
issued by ISAM-interface Closa 27 
Close modules 
IFGOZOO0N 27, 218 
IFGO2ZO00T 27, 216, 217 
IFGO2ZO00V 27, 214, 432 
IFGOZOOW 41 | 
IFGO2ZO00Y 41 
IFGO2Z02L 41 
IGC00020 27 
Close modules, control program 
IFGO2ZO00W 41 
IFGO2Z00Y 41 
Close work area 
See CLW work area 
CLOSEACB IDA0200S 27 
Closing a VSAM cluster 
from a VSAM-user's program 26, 216 
from an ISAM-user's program 26, 214 
closing more than one VSAM data set at a 
time 41 
CLSBASE IDA0200T 27 
CLSPATH IDAO0200T 27 
CLSPHERE IDA0200T 28 
CLSUPGR IDA0200T 35 
CLW work area 
description of 365 
getting dump of 477 
mapped by IDACLWRK macro 365, 435 
CMB control block 
description of 366 
mapped by IDACMB macro 435 
used by Virtual Storage 
Management 472 
communication with VSAM, 2 
compression, key——for an index entry 
processing 3 
COMPRS IDAQ19RH 111, 259 
CONBASE IDA0192A 13 
eoapee oe a user's program to a data 


et—Open processing i1 
CONPATH IDAQ192F 21 : 
control area 
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control block interrelationships 
before and after data set 
sharing 324%, 327 
data~AMB structure 332 
index-AMB structure 334 
path processing 329, 331 
shared resources 335, 337 
splitting 250, 318 
virtual storage management 472 
VSAM control block structure-~ISAM 


user 325 
VSAM control block structure—VSAM 
user 32 


control block chains in CSA 480 
control block identifiers 339 
sontrol block manipulation 
building-——-GENCB processing 185 
displaying-—SHOWCB processing 187 
modifying~—MODCB processing 187 
return codes 466 
summary of 3 
testing-—-TESTCB processing 187 
Sone block placement in subpools 2, 
3 


control blocks recorded by the 
Generalized Trace Facility 441 
control blocks shared between two or 
more user programs 
description of 326, 331 
control blocks, getting a dump of 477 


control flow report, description of 427 


control interval 
definition field CIDF 318 
format 315 
free space ina 315 
record definition field RDF 317 
aoe interruption 5, 77, 81, 103, 


splitting 249, 317 
control interval access 

GET processing 134, 139 

GETIX processing 134 

improved 134, 138 

PUT processing 


adding a new control interval 136 


restrictions 139 
updating a control interval 138 
PUTIX processing 138 
reading a control interval into a 
buffer 157 
restrictions 70 
control interval definition field 
CIDF 318 
control program communication with 
VSAM 2 


CONVERT IGC1i21 193 
COUNT IDADI9RJ 121 
CPA control block 
chained together by I/0 
management 193 
description of 367 
mapped by IDACPA macro 435 
create-ENDREQ processing 128 
creating a key~sequenced data set 
building an index entry for a 
completed data control interval 90 
description of 
getting a new free~spaca control 
area 88 
getting a new free-space control 
interval 8&6 
inserting an index entry for a new 
ees record at the next higher 
eve 
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creating an ACB, EXLST, or RPL-—GENCB 
processing 185 
creating space to insert @ new or 
modified record in a data control 
interval 102 
cross-reference 
microfiche reports, description 
of 427 
CSA, dumping control blocks in 477 
CSL control block 
built by Open 13 
description of 372 
mapped by IDACSL macro 435 
recovery of global storage 52 
virtual storage management 472 
CTGFL control block 
mapped by IEZCTGFL macro 437 
used during Open processing 13 
CTGPL control block 
mapped by IEZCTGPL macro 437 
used during Open processing 13 
evrrent cluster information in OPW 403 
CVT macro 434% 
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DADSM, Scratch Routine 223 
data AMB control block structure 
base cluster 332 
data area-dafinition macros 434 
data management resource manager 
IFGOTCOA 51 
data record 
control-interval split 316 
format 315 
record definition field RDF 317 
data request processing 
data set creation 
entry-sequenced data set 83 
key-~sequenced data set 84, 257 
relative record data set 140, 263 
data set format 
control~area format 318 
control~interval format 315 
data record format 315 
description of 315 
Data set management 
Close 
See Close 
getting dump of Open, Close, and 
End-of-Volume work areas 474 
mathod of operation 10 
Open 
See Open 
program organization 206 
recovery routines 209, 473 
summary of 
data sats shared between two or more 
user programs 
control block structure 
before and after sharing 327 
path processing 331 
during Open processing 10 
data space, verifying a non-VSAM 
callar's authorization to process data 
sets in 22 
DATARTV IDA019RG& 81, 232 
DBDCVAL IDA0192Y 47 
DCB control block 
conditions before open 27 
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exception codes, ISAM, in relation to 
VSAM return codes 
reset of module address fields 27 
DCB exit routine 23 
DCBEXIT IDA0192I 23 
DCBINIT IDA0192I 24 
DCBMERGE IDA0192I 23 
DCRUCBCT IDAO0200T 35 
DEB control block 
built during Open processing 23, 209 
removing it from the TCB‘'s DEB 
chain 41 
used during End-of-Volume 
processing 165 
used during Open processing 11 
used during restart processing 61, 
65 


DEBCHK macro 39, 45, 438 
DEBCNTMX IDA0195A 481 
DECB exception codes, ISAM, 
to VSAM return codes 488 
DECGVSRT IDAOCEA2 53 
DECHNDEB IDAO0200T 41 
daferred requests 
asynchronous 75 
synchronous 75 
DEHOOK IDA0200B 39 
DEHOOK IDA0200T 41 
DELETE macro 
description of 438 
issued by Close 27 
deleting records in the data set 123 
deletion, forced, of a global resource 
pool 36, 483 
DELETRTN IDA0200S 27 
DELPTR IDAOL9RJ 117, 121 
DELSECT IDAOD19RJ 117, 121 
DELSEG IDAOD19RS 101, 123, 244, 245 
DELVRP IDAO192ZY 47 
DELVSRP IDAOA05B 65 
DEQ macro 438 
DEQBUSY IDA0D192ZA 23 
destaging data to mass storage 
Close 39, 
temporary Close 45, 221, 459 
determining a data control interval's 
RBA 235 
direct-access device space management 
(DADSM) 
Scratch Routine 223 
summary of 
diract PUT, modifying a key~sequenced 
data set 98 
direct retrieval 
direct addressed GET 76 
direct keyed GET 77 
displaying a control block's 
contents-—SHOWCB processing 187 
distributed free space 316 
DIWA control block 
built by Open 13 
dascription of 373 
mapped by IDADIWA macro 435 
used during 
key-sequenced data set 
modification 103 
record-management raquest-string 
processing 
DLVRP IDA0192Y 47 
DLVRP macro 438, 440 
DLVRP request 
forced deletion of global resource 
pool 
macro 440 
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method of operation 46 
program organization 224 
recovery 47, 48 
DOM macro 438 
DSCTLBLK IDAO0557B 165 
DSCTLCLK IDA0557B 165 
DSL control block 
built by Open 13 
description of 375 
mapped by IDADSL macro 435 
dumping VSAM control blocks in CSA 
description of 477-483 
messages 474 
range variables 481 
recovery 
return codes 481 
dynamic string addition 11, 212 
dynamically building a control 
block-—GENCB processing 185 
DYNSTRAD IDA0192Y i111 
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ECB condition codes 
See also IDAWAIT 
in AMBXN control block 352 
set by end appendages 200 
ECB macro 434 
ECODE 
description of 445 
EDB control block 
built by Open 13 
description of 376 
mapped by IDAEDB macro 435 
used during 
building of channel program 196 
End-of-Volume processing 165 
restart processing 65 
end appendages, I/0 management 201 
and-of-control-area processing 
and End-of~-Volume processing 83 
during add-to-end processing 83 
during key-sequenced data set 
creation 
end-of-control-interval 
processing-—~during add-to-and 
processing 
End-of-Volume 
called by end-~of-control-area 
processing during add-to-and PUT 
processing 83 
called during data set creation 8:9 
description of 162 
diagnostic information 473 
method of operation 162 
program organization 278 
return codes 466 
summary of 3 
End-of-Volume work area, getting dump 


of 4 
ENDIO IDAO0200T 27 
ENDREQ macro 
description of 438 
issued by Close 27 
not during create time 128 
ENQ macro 11-22, 27-43, 438 
ENQBUSY IDA0N192Y i1 
ENQFUNC IDA0200T 27 
ENQFUNC IDA0231T 43 
ENQINIT IDAO2Z00T 27 
ENQINIT IDA0231T 43 
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ENTKEY IDAO19RI 260 
entry index, processing 
during data set creation 91 
for higher-level index~set index 
records 114 
key compression 112 
entry types in VCRT 
index 416 
open 416 
upgrade 416 
EOCA IDA019RS 83, 87-89, 246 
EOQDAD-—-ISAM-user's macro, issued by a 
QISAM-user's program 
EOVTEST IDAM19R3 191 
ERASE macro 
description of 438 
for a key-sequenced data set 122 
method of operation 123 
program organization 244, 245 
erasing a user's data record 245 
error codes 
Control Block Manipulation 467, 468 
during Open processing 13 
End-of-Volume, set in ACBERFLG 


field 466 
Open/Close/End-of-Volume function 
codes 


record management 
ECB condition codes 200, 201 
LERAD exit routine 451 
error exits 


See ESTAE exits 
exception routine 275 
logical error 451 
ERRORFLG IDA0231B 45 
errors detected 
during ISAM-interface Open 
processing 23 
while clesing an ACB 41 
ERRPROC IDA121A4 203 
ESETL-~-ISAM-user's macro, issued by a 
QISAM-user's program 
ESL control block 
built by Open = 13 
description of 377 
mapped by IDAESL macro 435 
ESTAE exits 
BLDVRP/DLVRP 47 
Checkpoint/Restart IDACKRAL 67 
data-set management and End-of-Volume 
recovery routine 48, 209, %81 
ISAM-interface data-~set management 
recovery routine 48, 473 
ESTAE macro 438 
exception codes, ISAM, in relation to 
VSAM return codes 485 
exception exit 275 
EXCP macro 438 
EXIT IDAML9OR3 191 
exit list for ISAM user 23 
exits 
ESTAE 
See ESTAE exits 
exception routine 275 
EXLST control block 
addresses of ISAM-user exit 
routines 
description of 377 
mapped by IFGEXLST macro 437 
EXTWA control block 
description of 378 
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FALLVGTT IDAOCEA2 51, 53 
FCTLG IDAOCEA2 53 
FDLMSG IDA0200T 37 
FDLVRP IDA0200T 37 
field attribute table 189 
FINDOPLH IDA019R1 127, 129, 131 
FINDSP IDAO1L9ORI 115, 262 
FIXDEBS IDAOAO5B 65 
FIXDEBS IDAOCO5B 61 
FLQUIS IDA0200T 27 
FLQUIS IDA0231T 43 
FLSR IDAOCEA2 53 
FLUSHBFR IDA0200S 27 
FOPEN IDAOCEA2 53 
Force Close Executor IDAOCEA2 48 
forced deletion of a global resource 
pool 36, 4 
FORCORE 473 
forward processing retrieval 8l 
free data-control-interval pointer 
description of 1 
format 
free-space control area--for data set 
creation 88 
free-space control interval—for data 
set creation 87 
free space in a control interval 316 
FREECORE IDAOA05B 
FREECORE IDAOCEA2 53 
FREECORE IDAO0200B 
FREECORE IDAO02Z00T 31, 35, 41 
FREECORE IDA0231B 45 
FREECORE IDA0231T 43 
FREEDBUF——-ISAM-user's macro, issued by a 
BISAM-user's program 169 
FREEMAIN macro 439 
FREESPHR IDAO0200T 35 
FREEVSRT IDA0192Y 47 
FREVGTT IDAO200T 37 
function codes 
chaeckpoint/restart 473 
Open/Close/End of Volume 430 
Record Management 451 
resource pool 473 
functional recovery routines, I/0 
management 
description of 201 
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G-TRACE macro 439 
GDT global data table 53 
GENCB macro 439, 440 
Generalized Trace Facility GTF 
and Close processing 
and End-of-Volume processing 279 
and Open processing 
control blocks recorded 441 
description of 1 
GET—-ISAM-user's macro, issued by a 
QISAM-user's program 
control-~interval retrieval 134 
description of 
mathod of operation 134 
relative record data set 140 
results in End-of-Volume 
processing 163 
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sequential retrieval 81 
GETCORE IDA0200B 39 
GETCORE IDA0200T 27 
GETCORE IDA0231B 45 
GETCORE IDA0231T 43 
GETINCI IDAOD19R4 83, 243 
GETIX request 
macro 439, 4%40 
method of operation 134 
GETMAIN macro 439 
GETSPACE IDAO1L9ORO 263 
GETSREC IDA019ORI 260, 262 
getting dump of Open, Close, and 
End~of-Volume work areas 474 
global data table GDT 53 
global shared resources, recovery 
with 482 
See also shared resources 
graphic symbols used in method of 
operation diagrams 
GSR global shared resources 
See also shared resources 
dump of control blocks with 477 
recovery with 2 
GSRDUMP IDA0200T 37 
GTF 441 
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header elements 
CMB control block 366 
HEB control block 384 
virtual storage management 472 
header format, index record 320 
HEB control block 
description of 384 
mapped by IDAHEB macro 435 
used in restart processing 65 
virtual storage management 472 
HEB save area 
described 418 
mapped by IDAVCRT 436 
HEBCNTMX IDAO195A 481 
HLINSERT IDAO19RH 113 
HOOK 
description of 444 
how to read 
method of operation diagrams 4 
program organization compendiums 
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I/0 managemant 
abends issued by 


205 


484 
communication vector table ABP 341 


and appendages 
method of operation 190 
summary of 3 
I/O supervisor 194-197, 280 
I/O support recovery routine 
description of 
Open, Close, and End-of-Voluma 
diagnostics 473 
program organization 209, 214, 
ICWA control block 
dascription of 385 
mapped by IDAICWA macro 435 
used during 
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data set creation 91 
data set modification 117 
ENDREQ processing 129 

IDAARDB macro 434 

IDAARWA macro 434 

IDAATECK CIDA019S7) 305 

IDABFR macro 435 

IDABIB macro 435 

IDABLPRM macro 435 

IDABNCI CIDAOIORW) 305 

IDABNCI1 (buffer management 

interface) 299 

IDABSPH macro 435 

IDABUFC macro 435 

IDACALL macro 439 

IDACBTAB macro 435 

IDACBUF CIDA019S7) 305 

IDACB1 macro 439 

IDACB2 macro 439 

IDACIDF macro 435 


IDACKRAL Checkpoint/Restart ESTAE 67, 


226 

IDACLWRK macro 435 

IDACMB macro 435 

IDACPA macro 435 

IDACSL macro 435 

IDACTREC macro 435 

IDADIWA macro 435 

IDADSECT macro 435 

IDADSL macro 435 

IDAEDB macro 435 

IDAELEM macro 435 

IDAENQRN control block 
description of 386 

IDAENQRN macro 435 

IDAEQUS macro 435 

IDAERKEY C€IDA019SD) 305 

IDAERMAC macro 439 

IDAERMAP macro 462 

IDAERMSG macro 435 

IDAERRCD macro 435, 462 

IDAESL macro 435 

IDAEXITR macro 439 

IDAFOREC macro 435 

IDAFRSHR CIDAOLORW) 306 

IDAFRSHR CIDAO1ORX) 299 

IDAGENC macro 435 

IDAGMAIN macro 439 

IDAGOCMP CIDA019SE) 306 

IDAGOIRB CIDAO19SE) 306 

IDAGOSRB CIDA19YSE) 306 

IDAGXCTL CIDAGLORR) 298, 306 

IDAGXU CIDAODI9RW) 306 

IDAHEB macro 435 

IDAICIAL ISAM-interface data-sat 

management recovery routine 473 

IDAICWA macro 435 

IDAIDXCB macro 435 

IDAIICB macro 435 

IDAIIPML ISAM interface 485 

IDAIIPM2 ISAM interfaca 4%85 

IDAIIPMS ISAM interfaca 485 

IDAIIREG macro 435 

IDAIISM1 ISAM interface 485 

IDAIMWA macro 435 

IDAINVAL CIDAO19RW) 306 

IDAIOB macro 436 

IDAIOMB macro 436 

IDAIOSCN macro 436 

IDAIRD macro 436 

IDAIXSPL macro 436 

IDALPMB macro 436 

IDAMODC macro 436 

IDAMLOR3S Problem-State I/0 Driver 
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IDAOCEAI 

Routine 
IDAQCEA2 
IDAOPWRK 
IDAPATCH 
IDAPDPRM 


IDAPFMT macro 


IDAPFREE 
IDAPGETM 


IDAPLH macro 


IDAPPCDE 


IDAPSL macro 


IDAPTCBV 
IDAPTSPC 


IDARDF macro 
IDAREGS macro 


IDARELIR 


IDARLXU CIDA019RW) 


IDARMRCD 


IDARPLE macro 


IDARST14$ 
IDARTMAC 
IDASHINX 
IDASHINX 


IDASHOW macro 
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Task Close 433 
macro 436 
macro 439 
macro 436 
439 
CIDAO1ORP) 
CIDAOLORP) 
436 
462 
436 
CIDAODLORP) 
CIDA019SC) 
436 
436 
CIDAO19RN) 


Executor 


macro 


436 
436 
macro 439 
macro 436 
CIDA019RW) 
CIDAODLIRX) 
436 


macro 


IDASRA (maps the sphere record 


area) 


IDASSL macro 
IDASVCX CIDA01958) 
IDASVR14¢ macro 
IDATEST macro 
IDAUCBV CIDA019S$7) 
IDAUPAD CIDA1214A3) 


436 

308 
439 

436 

308 


303, 308 


IDAUPT macro 


IDAUPXIT 


436 
CIDAOD19RP) 308 


IDAVAT macro 436 


IDAVCRT macro 
IDAVGTT macro 
IDAVIOT macro 


436 
436 
436 


IDAVIRT control block 
dascription of 387 


IDAVMT macro 
IDAVSI (maps the VSAM shared information 


block) 


IDAVSRT macro 


IDAVUCBL 


436 


436 
436 


macro 436 


IDAVVOL control block 
description of 387 


IDAVVOLL 


IDAWAX macro 
IDAWSHD macro 


IDA0bbbb 
IDAOQ19C1 


Manipulation 


IDA019SC 
IDA019SD 
IDA019ST 
IDA019SU 
IDA019SV 
310 
IDA019SW 
IDA019S2 
IDA0195S4% 


310, 314 


IDA019S7 
310 
IDA019S8 
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IDA0192B 
 IDA0192C 
463 
IDA0192D 
IDA0192F 
Upgrade 
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437 
437 
49 


Control Block 

395, 468 
CIDA019SC) 310 
CIDAO0N19SD) 310 

(Trace) 301 

CR/M trace I4Q) 301 
(validate cross memory) 


(SRB mode routine) 301, 
(fast path I/0) 302, 310 
Cdisabled exit routina) 


macro 


501, 
310 
302, 


Ccontrol block update) 302, 
Ccontrol block support 

302, 310 
Open a cluster 209 
catalog interface 


Stage/Destage 431 
Open Base Cluster, Path, and 
Alternate Index 432, 463 


209, 431, 
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IDA0192W Channel-Program Area Build 463 
IDAO0L92ZY String Build and 


Shared-Resource Processor 


IDA0192Z 
IDAO195A 
IDA0200B 
IDA0200T 
IDA0231B 
Cluster 
IDA0231T 
String 
IDAO557A 
IDA0557X 
IDA0557X 
IDA0557X 
429 
IEAABDOO 
IEASMFEX 
IEAVADO08 
IECDIOCM 
IECDIOSB 
IECDIPIB 
IECDSECS 
IECDSECT 


Contr 
VSAM 
Close 
VSAM 
VSAM 
433, 
VSAM 


432, 
ol Bleck Build 465 
SNAP Format 477 

a Cluster 463 
Close String 432, 463 
Close, TYPE=T, a 


4653 
Close, TYPE=T, 


465 


433, 463 


VSAM 

Cexte 
Cexte 
Cexte 


PARML 
194, 
SNAP 
macro 
macro 
macro 
macro 
macro 


IECRRPL macro 


IECSCR1 
ITECSRCR1 
IECVQCNT 


280 
197, 
201, 


IEESMCA macro 


TEEVCHWA 
TEEVRSWA 
IEFJFCBN 
IEFJFCBX 


macro 
macro 
macro 
macro 


IEFJMR macro 
IEFTCT macro 
IEFTIOT macro 


IEFUCBOB 


IEFVAMP AMP Parameter Interpreter 


macro 


IEZABP macro 


IEZCTGFL 
TEZCTGPL 


macro 
macro 


IEZDEB macro 
IEZIOB macro 
IEZJSCB macro 
IFGACB macro 


IFGEXLST 


macro 


IFGRPL macro 
a management resource 


IFGOTCOA 

manager 
IFGO191X 
IFGO191Y 
IFG0192B 
IFGO192TI 
IFGO193A 
IFGO195T 
IFGO196V 
IFGO196W 
IFGO198N 
IFGO2Z00N 
IFGO200S 
IFGO200T 
IFGO200V 
IFGO200W 
IFGO200Y 
IFGO202L 
IFGO231T 
IFGO02322 
IFGO550Y 


catal 
catal 
432 
alias 
Open 
Open 
Open 
Open 
Open 
Catal 
alias 
alias 
Close 
Close 
Close 
Close 
alias 
Close 
alias 


End-of-Volume 466 
nd VSAM data set) 
nd VSAM dataset) 
nds VSAM data set) 


IB 477 
280 
477 

437 
437 
437 


305 
Sil 
279, 


437 
430 
437 

437 

437 
437 
437 

437 

437 


437 


og Open 210 
og Open 210 


for IFGO192A 207 
module 11, 210 
module 222 
module 23 
module 23 
module 24, 481 
og Close module 27, 
for IFGO192A 214 
for IFGO20GA 217 
module 27, 214, 
modula 41 
module 41 
module 41, 214 
for IFGO192A 221 
CTYPE=T) module 221 
for IFGO200N in catalog 


218 


432 


management 279 


IFGO551F End-of-Volume module 


279, 433 


IFGO557A alias for IFGO192A 279 
IGC0001I Open module 


11 
IGC0002C Close (TYPE=T) module 
IGC00020 Close module 


221 
27, 214 
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IGCOO05E End-of-Volume module 279 
IGGCAXWA macro 437 
IHAASCB macro 437 
IHAASXB macro 437 
IHADCB macro 437 
IHADCBDF macro 437 
IHADECB macro 437 
IHADSAB macro 437 
IHAFRRS macro 438 
IHAIGE macro 438 
IHAPSA macro 438 
IHAPVT macro 438 
IHARB macro 438 
IHARMPL macro 438 
IHASDWA macro 438 
IHASRB macro 438 
IHJSSCR macro 438 
IICB control block 
built by Open 11 
description of 388 
mapped by IDAIICB macro 435 
IKJRB macro 438 
IKJTCB macro 438 
IMASPZAP 481 
aieecer control~interval access 135, 
1 
IMWA control block 
description of 391 
mapped by IDAIMWA macro 435 
index 
control-interval format 319 
format 319 
index AMB control block structure 334 
index entry 
in alternate index 323 
in prime index 
pointers 319, 321 
in VCRT 418 
index record 
alternate index 323 
dummy entry 322 
entry format 322 
format 319 
free data-control-~interval 
pointer 321 
index entry 
alternate index 323 
pointers 321 
sections 322 
index-record header format 320 
key compression 
processing 113 
index racord processing 
control-interval access of prime 


index 
GETIX 134 
PUTIX 138 


index-set-record processing 114 
reading an index control interval 
into a buffar 158 
searching an index record 160 
sequence-set-record processing 
create-time processing 254 
noncreate"time processing 259 
updating the prime index 
adding to the end of a key range 
or data set 260 
splitting a control area not at 
the end of a data set or key 
range 263 
upgrading alternate indexes 152 
index search 
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for GET processing 77 
starting index level 77 
indirect data-address list IDAL 192 
INITIICB IDA0N192I 11 
INITPLH IDA0192Y 11 
INITRPL IDAOD192I 23 
INIT192A IDAO0192A 13 
INITZ00B IDAO0200B 39 
INITZ00T IDAO0200T 27 
INIT231T IDAO0231T 43 
insufficient space for a new record 
during add-to-end processing 83 
INTNEWRC IDA019RG 91-97, 254, 256 
introduction to VSAM 1 
IOB VSAM Extension control block 
mapped by IDAIOB macro 436 
replaced by IOMB~IOSB-SRB 392 
IOMB control block 
built by Open 13, 209 
description of 392 
mapped by IDAIOMB macro 436 
used by I/O management 190 
IOMBXN IOMB extension control block 394 
IOSB control block 
built by Open 13 
description of 394 
mapped by IECDIOSB macro 437 
prepared by I/0 management for IZ0 
supervisor 196 
ISAM interface 
abends issued by 485 
BISAM request translation 168 
diagnostic information 388, 473 
ISAM exception codes in relation to 
VSAM return codes 485, 488 
QISAM request translation 166 . 
record management 166 »} 
recovery routine 48 wall 
vegcrere an ISAM-user's data set 26, 


Sacre an ISAM-user's data set 10, 


ISAM-to-VSAM processing 
See ISAM Interface 
ISAM user exit routines 23 
ISAM-user's program 
closing a VSAM cluster 214 
opening a VSAM cluster 207 
IWRITE IDAOI9RI 260, 262 
IXIDAWR IDAO19RH 103 
IXSPL control block 
description of 395 
mapped by IDAIXSPL macro 436 
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JCL job control language 
AMP DD parameter 23 
JOBCAT DD statement, used during Open 
processing 13 
STEPCAT DD statement, used during 
Open processing 13 
JFCB control block used during Open 
processing ll 
JOBCAT JCL DD statement, used during 
Open processing 13 
JSCR control block 


Open 13 
JSTERM IDAOCEA2 51 
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description of 445 
key compression for an index entry 113 
key range—and End-of-Volume 
processing 165 
keyed processing 
keyed direct GET 77 
keyed POINT i125 
keyed sequential ERASE 122 
keyed sequential GET 81 
keyed sequential PUT 84 
restrictions 71 
KEYWDTAB 
description and format 395 


label-where-used report, description 
of 
layout of method of operation 
diagrams 5 
LERAD exit routine 

description of 451 

register contents on entry to 451 
LLOR least length of record that 
contains all key fields 153 
LNEXTE IDAQLORI 115, 262 
LOAD macro 439 
LOADMOD IDA0D192I 23 
local memory lock, obtained by I/0 
management 1 
LOCATE SVC 26 41, 222, 223 
LOCATECP IDA121A4 203 
locating a record in a data set using 
the POINT macro 124 
Loc2 IDA0192C 17 
LOC3 IDA0192C 17 
logical-error 

exit 451 
LPA~—-link pack area pageable 1 
LPMB control block 

built by Open 13, 209 

description of 96 

mapped by IDALPMB macro 436 

used to build channel program 196 
LSR local shared resources 

See shared resources 
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macros 
that define data areas 434 
that generate executable code 438 
managing I/0 buffers shared resources 
MRKBFR macro 144 
SCHBFR macro 148 
WRTBFR macro 146 
marking a buffer MRKBFR macro 144 
mass insertion 83 
Mass Storaga System 
ACQUIRE 
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End-of-Volume 165, 279 
Open 209 
temporary Close 221 
relation to the system 2 
RELINQUISH 
Close 217 
temporary Close 221 
MAXVCSLN IDA0195A 481 
memory lock, local, obtained by I/0 
management 191 
messages 
description of 429 
macro~coding errors 430 
modules that detect and issue each 
message 429 
to the programmer 429 
method of operation diagrams 
and VSAM module listings 7 
description of 4 
entry conditions, example of 5 
example of 5 
input, example of 4 
notes for, example of 7 
output, example of 4 
process steps, example of 5 
microfiche 
cross-reference reports, description 
of 427 
MODCB macro 439, 440 
MODESET macro 439 
modifying a control block-—MODCB 
processing 189 
modifying a key-sequenced data set 
building an index entry and inserting 
it into an index record 110, 112 
creating space to insert a new or 
modified record in a data control 
interval 102 
description of 99 
single- or multiple-record 
insertion 
splitting a control area to create 
free space and to generate an index 
record 104 
splitting an index record to create 
space for a new index entry 116 
updating a higher level of the index 
with an antry for the new sequence 
set record 114 
updating an existing record 100 
modifying a relative record data 
set 140 
module directory 296 
module flow compendiums program 
organization 205 
module listings 
and method of operation diagrams 7 
description of 20 
module work areas, O/C/EOV 474 
modules that detect and issue 
messages 429 
mounting a volume 
during End-of-Volume processing 162 
MOVEKEY IDA019R¢ 234 
MOVEPTR IDA019RJ 117 
MOVEPTRL IDAO19RJ 121 
MOVEPTRR IDAQI1IRJ 121 
MRKBF IDAO1LORY 145 
MRKBFR request 
macro 439, 440 
method of operation 144 
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NEWRCRD IDAOLORI 260, 262 

NMEMTERM IDAOCEA2 51 

noncreate ENDREQ processing 126 
notes for mathod of operation 
diagrams 7 

nstring addition, dynamic 11, 212 
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OBTAIN macro 439 
obtaining more space for the user's data 
set—End-of-Volume processing 
obtaining the next control interval for 
the data set 
during create processing ?47 
during entry~sequenced data set 
processing 247 
during Key~sequenced data set 
processing 
OPCAT1 IDA0192C 17 
Open 
diagnostic information 473 
method of operation 11 
program organization 208 
summary of 
Open entry format in VCRT 417 
OPEN macro 
See also Open 
description of 439, 4%40 
issued by ISAM-interface Open 10 
Open modules 
IFGO191X 210 
IFGO191Y 210 
IFGO193A 11 
IFGOI96V 23 
IFGO196W 23 
IFGO198N 24 
IGCOOO01I 11 
SECLOADA 222, 223 
Open parameter lLlist——built. by ISAM 
interface 11 
OPEN trace 441 
Open work area 
description 398 
getting a dump of 474 
initialized for restart 63 
Open/Close/End-of-Volume Racovery 
Routine 48 
Open/Close/EOV 
diagnostic information 473 
function codes 430 
return codes, in the ACBERFLG 
field 462 
summary of 3 
work areas, getting a dump of 474 
OPENACB IDA0N192I 11, 
opening a VSAM cluster 
from a VSAM-user's program 208 
from an ISAM-user's program 207 
OPNBASE IDAOL92F 17 
OPNPATH IDA0192F 21 
OPNUPGR IDAOLO2F 19 
OPW 
See Open work area 
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packaging 
control blocks in subpools 2, 338 
pageable link pack area 1 
PAGEFIX IDA0192F 17 
PAGEINI IGC121 193 
PAGEOUT IGC121 194 
PARMINIT IDAO0200T 27 
PARMINIT IDA0231T 43 
PARM1 
description of 4%46 
PARM2 
description of 447 
PASS1 IDA185A2 197 
PASS2 IDA185A2 197 
PASS3 IDA1&5A2 197 
path control block structure 328 
path processing 
close orocassing 26 
method of operation 150 
open processing 7 
program organization 267 
temporary Close processing 44 
work area for WAX 424 
PERMERR IDA121A% 203 
PGFIX macro 439 
PGFIX routine 193, 280 
PGFREE macro 439 
PGFREE routine 194, 280 
placeholder 
See PLH control block 
PLH control block 
assignment to request string 70 
built by Open 13, 209 
description of 403 
mapped by IDAPLH macro 436 
number of 70 
restrictions resulting in error 
codes 
used by 1/0 management 190 
used during 
data set modification 99 
freeing of buffers 154 
PLHEXP IDA019R4& 234 
POINT macro 439, 440 
POINT processing 
addressed 124 
POST macro 439 
POST routine 201, 282 
prime index 
See index 
prime-key pointers, alternate 
index 151, 
PROBDET IDAO0557A 165 
PROBDT IDA0200B 39 
PROBDT IDA0231B 45 
processing more than one record with a 
Single macro request 71 
program organization compandiums 
dascription of 204 
example of 204 
flow of control, example of 205 
notes, example of 
programmer messages 429 
prologs, module, description of 204 
protected sphere block 
virtual storaga management 472 
PSL control block 
built by Open 13 
description of 409 
PUT macro 
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See also PUT request 
description of 441 
issued by Close 27 
PUT request 
addressed sequential PUT 
add-to-end processing 83 
buffer assignment 85 
create processing 82 
description of 82 
insufficient space for a new 
record 
mass insertion 82 
releasing excess buffers 83 
control-interval processing 
add a new control interval 136 
update a control interval 139 
creating space to insert a new or 
modified record in a data control 
interval—for 100 
keyed sequential PUT 84 
macro 0 
method of operation 82, 136 
program organization 242 
relative record data set 140, 263 
resulting in End-of~Volume 
processing 163 
single- or multiple-record insertion 
in a key~sequenced data set 
updating an existing record in a 
key-sequenced data set 100 
PUT—-ISAM-user's macro, issued by a 
QISAM-user's program 167 
PUTIX request 
macro 440, 441 
method of operation 139 
PUTNONSQ IDA019RQ 263 
PUTSQCRE IDA019RQ 263 
PUTSQIST IDAO019RQ 263 
PUTSQNCR IDAOD1ORQ 263 
PUTX-—-ISAM-user's macro, issued by a 
QISAM-user's program 


Le | 


QISAM (queued indexed sequential access 
method) request translation 
See also BISAM and 
exception codes in relation to VSAM 
return codes 488 
quiescing the data set during Close 
processing 


Le] 


R/M trace facility 441 

RBA pointers, alternate index 

RBKEY IGC121 193 

RCVRRTN 482 

RDAHEAD IDA0D19R2 155, 157 

RDF record definition field 317 
read-ahead buffering 154, 271 

read channel program 369 

READ IGC121 193 

READ—ISAM-user's macro, issued by a 
BISAM-user's program 169 

READBFR IDAO1ORY 274 

READBFR IDA0N19R2 159 

reading 


151, 325 
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method of operation diagrams 4 
program organization compendiums 205 
real address list IDAL 192 
rebuilding VSAM control blocks for 
restart 2 
record definition field RDF 317 
record format 
data 316 
index 319 
record management 
data-request processing 70 
description of 441 
ECB condition codes 
See also IDAWAIT in the External 
Procedure Directory 
in AMBXN control block 352 
set by end appendages 200 
End-of-Volume 
method of operation 70 
request processing 74 
summary of 
record segment, of a spanned record 317 
recover termination manager 
Open/Close/End-of-Volume 
diagnostics 473 
program organization 212 
RECOVERY IDAOAO05B 63 
RECOVERY IDAOCOS5B 61 
RECOVERY IDAOI96C 59 
recovery routines 
BLDVRP/DLVRP ESTAE 47 
checkpoint/restart 66 
data-~saet management 48, 473 
1/0 management 193, 280 
ISAM interface 213, 473 
VSAM SNAP dump facility 477 
recovery termination manager 280 
method of operation 47 
register contents 
See also return codes 
on entry to the LERAD exit 
routine 451 
passed to user's DCB Exit routine 23 
relating mathod of operation diagrams to 
VSAM modules and procedures 
relationship of control program, data 
stored on DASD, and user's processing 
programs 2 
relative racord data set 
format 
processing 
Th of operation 77-81, 125, 
program organization 240, 263 
releasing buffer after direact-GET record 
retrieval 77 
releasing excess buffers for mass~insert 
mode PUT processing 
RELINQUISH Mass Storage System 
Close 217 
RELSE—ISAM-user's macro~issued by a 
QISAM-user's program 
REMVGTT IDA0Z00T 37 
repositioning 
for restart 65 
REPOSITN IDAOQAO05B 65 
request processing 70 
request string, assignment of 
placaholdars to 
and none available 71 
effect of ENDRE@ on 71 
in sequential processing 71 
RESERVE macro 440 
resource pool shared resources 


Index 507 


buffar management 155, 156 

ae a resource pool BLDVRP 46, 
24 

Close processing 36, 42, 341 

control block structure 335 

eon a resource pool DLVRP 46, 


forced deletion of a global resource 
pool .36, 342, 482 
managing 1/0 buffers 


MRKBFR 144 
SCHBFR 148 
WRTIBFR 146 


recovery with GSR 483 
restart processing 62 
restart processing 
method of operation 609 
program organization 228 
retrieving a control interval for the 
user's program 135, 161 
return codes 
Close, set in ACBERFLG field 462 
Control Block Manipulation 466 
End-of-Volume, set in ACBERFLG 


field 466 
Open/Close/End-of-Volume function 
codes 430 


Open, set in ACBERFLG field 462 
record management 
ECB condition codes 200 
physical-error messages 441 
register 15 contents after a 
request completes 481 
RETURN macro 440 
RICHECK IDA019R1 131 
RIENDREQ IDAO19R1 127 
RJE IDA019RJ 117 
RLSEBUFS IDA019R4& 77, 242 
RMOVAMBL IDAO200T 33, 35 
RPL control block 
assignment of, for ISAM-user's 
program 23 
chained together 71 
description of 409 
RPLE control block 
description of 412 
mapped by IDARPLE macro 436 


Ls | 


SAVE lists 
built by Open 13 
SCANDATA IDAOD19RG4 234 
SCANGSR IDAOQCEA2 51 
SCHBFR request 
macro 440 
method of operation 148 
SCHDASYN IDA121A3 201 
SCRA catalog recovery area in system 
storage 13, 33 
Scratch Routine, DADSM 222 
SDLOAD IDAO200T 37 
SDUMP macro 
description of 440 
issued by I/O-management functional 
recovery routines 
searching the index record to build an 
index racord during data set 
modification 108 
SECLOADA Open module 222 
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section-—-index record, description 
of 2l 
See also index record and 
index-record processing 
sequence-set-record processing 
create-time processing 
building an entry 254 
writing the record 256 
noncreate-time processing 259 
sequential retrieval 
buffer management 161 
description of 81 
program organization 234 
sequential GET 8:0 
SETBITS IDAI21A4 203 
SETFRR macro 440 
SETL——ISAM-user's macro, issued by a 
QISAM~-user's program 166 
SETLOCK macro 
SETRP macro 440 
SHARE IDAO0200B 39 
shared resources 
buffer management 156 
edaece a resource pool BLDVRP 46, 


Close processing 36, 42 
control block structure 331 
oe ae a resource pool DLVRP 46, 
dump of GSR control blocks 477 
forced deletion of a global resource 
pool 36, 482 
managing I/0 buffers 
MARKBFR 144 
SCHBFR 148 
WRTIBFR 146 
recovery with GSR 482 
SHAREDEQ IDAO0200B 39 
sharing control blocks between user 
programs 
See shared resources 
SHOWCAT macro 440, 441 
SHOWCB macro 440, 441 
single- or multiple~=record insertion 98 
size of VSAM 1 
skip sequential processing 
GET 233 


modifying a key-sequenced data 
set 99 
SMF records 
Type 62 during Open processing 22 
Type 64 
during Close (TYPE=T) 
Processing 44, 221 
during Close processing 38, 217 
SMF System Management Facilities 
used to count EXCPs 194 
VSAM writes records to thea SMF 
datasat 22, 38, 44 
SMFUPD IDAO0557A 165 
SMFWTM macro 440 
SNAP macro 477 
space allocation 
for a key range 165 
requirements for End-of-Volumea 
Processing 164 
spanned records 
format 315 
index entries 322 
processing 
method of operation 98 
program organization 234, 242-244 
sphere block 
protected 52, 469 


© Copyright IBM Corp. 1974,1985 


J 


Restricted Materials of IBM 
Licensed Materials —- Property of IBM 


unprotected 468 
splitting a control area 
description of 251 
to create free space 104 
splitting a control interval 251 
splitting an index record to create 
space for a new index entry 116 
SQICHECK IDAOD19R& 83, 242 
SRB control block 
built by Open 209 
description of 413 
mapped by IHASRB macro 438 
used by I/0 supervisor 196 
SSCR 
See subsystem checkpoint record 
SSL control block 
built and used by OPEN 13 
description of 413 
mapped by IDASSL macro 436 
STAE exits 
See ESTAE exits 
Stage II Exit Effector 201, 282 
staging data from mass storage 
Open 
temporary Close 45, 221 
starting-search index level 77 
STARTIO macro 198, 280 
State II Exit Effector 282 
STEPCAT JCL DD statement 13 
storage blocks used in virtual-storage 
management 470 
storage layout, virtual 2 
storage management, virtual 468 
stored record 
STOREUCB IGC121 194 
subpools, control block placement in 2, 
338 
subsystem checkpoint record 
built 58 
processed 60 
Supervisor-Call SVC processing 
program 2 
SVC processor 2 
SVC 13 47 
I ae by ISAM interface 10, 
20 
SVC 20-——-issued by ISAM interface 26 
SVC 23 (Close, TYPE=T) 42 
SVC 26 LOCATE 13, 222, 223 
SVC 29 SCRATCH 222 
SVC 52 RESTRT 228 
Svc 55 83, 163 
SVC 63 CHKPT 226 
$VC121——-issued by I/0 management 191 
symbol-where-used report, description 
of 427 
SYNAD~ISAM-user's macro 
and CHECK processing 130 
issued by a Q@ISAM-user's program 169 
SYNADAF message 
built by the ISAM-interface SYNAD 
routine 169 
SYNCH macro 
issued by Close processing 27 
issued by restart 
synchronous request 
processing——deferred 75 
System Management Facilities SMF 
used to count EXCPs 194 
VSAM writes records to the SMF 
dataset 23 
SYSVSAM major resource for ENQ 27, 43 
SYS1.DUMP 473 
SYS1.LOGREC 473 
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task Close 50 
TCB control block, used during Open 
processing 11 
TCLSBASE IDAO0231T 43, 45, 437 
TCLSPATH IDA0231T 43, 437, 438 
TCLSUPGR IDA0231T 43, 
temporary close (TYPE=T) 
method of operation 42 
program organization 220 
temporary-Close processing 221 
TERM IDAQ557A 165 
terminating a data request ENDREQ 
processing 
during data set creating 129 
not during data set creation 127 
TERMRPL 488 
TERM192A IDAQ192A 23 
TERM200T IDA0200T 28 
TESTAUTH macro 440 
TESTCB macro 440 
TESTEOV IGC121 193 
testing the contents of a control 
block 188 
TIME macro 440 
trace function 
adding trace points 443 
ending 
example 442 
printing 443 
Starting %42 
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UCRA catalog recovery area in user 
storage 13 
UPADWAIT CIDA019S2) 
UPCATACB IDA0200B 39 
UPCATACB IDA0231B 45 
UPCATDEQ IDA0200B 39 
UPCATDEQ IDA0231B 45 
update write channel program 371 
update/erase processing~—Record 
Management 4 
updating a higher level of the index 
during key~sequenced data set 
modification 114 
updating an existing user's record 
description of 245 
in a key-~sequenced data set i100 
updating the index 
adding to the end of a key range or 
data set 260 
splitting a control area not at the 
end of a key range or data set 263 
upgrade entry format in VCRT 417 
upgrade set 
Close 26 
description of 191 
Open 18, 191 
upgrade table UPT 
built by Open 18 
description of 414% 
mapped by IDAUPT macro 436 
used for alternate~indax upgrade 152 


Index 509 


upgrading alternate indexes 153, 268 

UPSMF IDA0192A 23 

UPSMF IDA0200B 39 

UPSMF IDA0231B 45 

UPT control block 
built by Open 18 
description of 414 
mapped by IDAUPT macro 
used for alternate-index 

upgrade 152, 268 
user programs with ISAM macros 


user's DCB exit routine 23 


ex 


VALCHECK IDA0200B 39 
VALCHECK IDA0231B 45 
VALIDCBS IGC1l21 193 


436 


1 


VALIDCHK IDA0192I 23 

VAT control block 
built by Open 209 
description of 415 


mapped by IDAVAT macro 436 
used by OQpan 20 
used by restart 61 

VATUPD IDA0192F 17 

VCRCORE 
described 417 

ga by IDAVCRT 436 

T 


See VSAM checkpoint/restart table 
VDECHAIN IDAOCEA2 53 
VERIFY macro 132, 440 
verifying a nonVSAM caller's 
authorization to process data sets in a 
VSAM data space 222 
VGTT control block 
dascription of 419 
mapped by IDAVGTT macro 
used by Close 36 
used by restart 62 
uaec by task Close axecutor 


mapped by IDAVIOT macro 436 
VIRTPROC IDA02Z200B 39 
VIRTPROC IDA0231B 45 
virtual-storage layout 2 
virtual storage management 472 


436 


50 


virtual subarea list VSL 193 
VMT control block 

description of 420 

mapped by IDAVMT macro 436 


VMTPROC IDAO2Z00T 35 
VOLLOC IDA0557B 163 
VOLMNT IDA0557B 163, 165 
VOLSW IDA0557B 165 


volume mounting and verification 
during End-of~Volume processing 
ane SWitching 165 
M 


163 


communication with other parts of 
control program 

functional areas 3 

introduction to I 

modules-~residence in pageable link 
pack area 1 
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processing~——summary of 1 
request processing—method of 
operation diagrams 70 

eee management—summary of 
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163; 


VSAM checkpoint/restart table 
described 416 
mapped by IDAVCRT 436 
VSAM-interface routine, during Open 
processing 13 
VSAM record managemant 441 
VSAMCBMX IDA0D195A 482 
VSI control block 
description of 421 


VSL virtual subarea list 193 
VSRT control block 
built by BLDVRP 46, 485 


description of 423 

mapped by IDAVSRT macro 
VSRT Vector Table 

description of 422 
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WAIT macro 440 

WAX control block 
built by Open 209 
mapped by IDAWAX macro 
used for path processing 

WRITBUFR IDA0200B He 


WRITBUFR IDA0231B 
WRITE IGC121 193 
WRITE-~-ISAM-user's macro, 
BISAM-user's program 169 
writing the last record before closing a 
data set 
WRIBFR request 
Close processing 39 
macro 440, 
method of operation 147 
temporary Close processing 45 
WSHD control block 
built by Open = 13 
description of 425 
mapped by IDAWSHD macro 437 
WTG where-to-go-table, used during Open 


436 


437 
150 


1ssued by a 
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Processing 11 
WTO macro 449 
XCTL macro 440 


XCTLTABL macro 438 
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